AVI файл проигрывается снова и снова
Falk0ner, вс, 06/07/2008 - 15:34.
В примере - используем событие MediaPlayer'а Notify
procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin with MediaPlayer1 do
if NotifyValue = nvSuccessful then
begin
Notify := True;
Play;
end;
end;
begin with MediaPlayer1 do
if NotifyValue = nvSuccessful then
begin
Notify := True;
Play;
end;
end;
Взято с сайта http://blackman.wp-club.net/myfaq/default.php
Отправить комментарий