MediaPlayer控件的Play方法(0分)

  • 主题发起人 主题发起人 coolren
  • 开始时间 开始时间
C

coolren

Unregistered / Unconfirmed
GUEST, unregistred user!
多媒体播放器的单击事件:
void __fastcall TForm1::MediaPlayer1Click(TObject *Sender,
   TMPBtnType Button, bool &DoDefault)
这个事件的一段:(希望自动播放下一首歌)
case Mplayer::btNext:
       MediaPlayer1->FileName=Mp3List->Strings[ListBox1->ItemIndex];

        Timer1->Enabled=True;

       MediaPlayer1->Open();

       MediaPlayer1->Play();

        break;

但是却不播放,停在那里不动了,歌名到是改为所要播放的下一首歌了。请问这是为什么?

       MediaPlayer1->Open();

       MediaPlayer1->Play();

        这两句不是已经开始播了吗?

 
帮帮我吧!
 
把mediaplayer->open();去掉;
在mediaplayer1->filename=mp3list->.....外加入循环语句试一试;
 
加入mediaplayer1.resume也可以啊
 
要用OPEN,就先STOP,再CLOSE,-》FILENAME,-》OPEN,-》PLAY
 
使用timer控件或使用media player 的OnNotify事件
 

Similar threads

I
回复
0
查看
719
import
I
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
740
import
I
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部