怎么在FileListBox中选择一个文件,然后用MediaPlayer播放?(一个很简单的问题)(30分)

  • 主题发起人 主题发起人 guaiguai
  • 开始时间 开始时间
G

guaiguai

Unregistered / Unconfirmed
GUEST, unregistred user!
我在做一个最简单的播放器的时候,用到了DirectoryListBox、FileListBox和MediaPlayer控件,我想实现的功能是在FileListBox中的文件列表中选择一个文件,然后用MediaPlayer控件播放,请问如何实现。
 
procedure TForm1.FileListBox1DblClick(Sender: TObject);
begin

MediaPlayer1.Stop;
MediaPlayer1.Close;
MediaPlayer1.FileName:=Filelistbox1.FileName;
MediaPlayer1.Open;
MediaPlayer1.Play;
end;
 
你的这个方法是对的,不过现在又有一个问题:
No MCI device open 怎么一回事呢?

 
MediaPlayer1的autoopen设为True,然后设计时预先指定一个可播放的文件,就可以了
 
接受答案了.
 
后退
顶部