MediaPlayer如何实现循环播放(20分)

X

xksyhjb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-12-03

• #1

MediaPlayer如何实现循环播放，
我在Notify事件里或EXIT事件里加
上
MediaPlayer.open;
MediaPlayer.play;
不但不起作用，反而当掉程序。

 

H

hanjiabo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-25

• #2

我有解决办法，这是我的邮件，请和我联系
mymail@sohu.com

 

T

TYZhang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-25

• #3

procedure TMainForm.MediaPlayerBackNotify(Sender: TObject);
begin
if MediaPlayerBack.Mode=mpStopped then
begin
MediaPlayerBack.Rewind;
MediaPlayerBack.Play;
end;
end;

 

X

xksyhjb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-06-26

• #4

接受答案了.