高分求：用 Tmediaplayer连续播放！！

Question

怎样用Tmediaplayer 实现连续播放！？
就是一个文件播放完了过后，会产生什么事件或消息？！！急求！大哥们救我！！！

Answer 1

//播放结束时触发OnNotify事件, 根据NotifyValue值判断procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
  if MediaPlayer1.NotifyValue = nvSuccessful then
    ShowMessage('end');
end;

Answer 2

YYQQ(阿鱼) ：
这句就有问题。
if MediaPlayer1.NotifyValue = nvSuccessful then  //播完了, 做其它的事提示：nvSuccessful  是啥子类哦，反正不匹配！

Answer 3

to boatzm(小舟):不会吧，在你那里运行不了吗? nvSuccessful 是VCL定义了的枚举常量, 不用管的, 在MPlayer.pas里

Answer 4

要么你看看你uses 里有没有加MPlayer这个单元 , 在我这里行啊