Как определить что MediaPlayer закончил проигрывать файл...

← →
Руслан (2004-08-11 13:42) [0]

Собственно вот...

← →
Ega23 © (2004-08-11 13:43) [1]

Музыки больше не слышно. :о)

← →
_student (2004-08-11 13:46) [2]

if MediaPlayer.Mode=mpStoped then ...

← →
Mihey_temporary © (2004-08-11 14:10) [3]

Событи OnNotify медиаплеера, а дальше см. _student (11.08.04 13:46) [2] и пример в справке.

← →
Думкин © (2004-08-12 06:10) [4]

Единственная проблема, иногда приходя в OnNotify по окончанию Mode<>mpStopped. Это у меня на фильмах наблюдалось.

← →
Mihey_temporary © (2004-08-12 18:19) [5]

2 Думкин:

Надо исходнички посмотреть, наверняка недоработочка.

← →
Eugene32 (2004-09-22 11:40) [6]

if NotifyValue = nvSuccessful then
begin
Notify := True; // это нужно.
Fmain.Close; // моя прога завершается
end;

← →
eugene32 (2004-09-22 11:42) [7]

Забыл....

Этот код делать в
procedure TFMain.MediaPlayer1Notify(Sender: TObject);