Media Player

← →
*Wish* (2005-03-22 20:00) [0]

Как заставить Медиа плеер проигрывать видео файл покругу? Желательно чтобы не было "морганий" там как ролик короткий? Если есть другой способ проигрывания компресированого видио на форме скажите пожалуста. :)

← →
olookin © (2005-03-22 20:33) [1]

procedure TForm1.Button1Click(Sender: TObject);
begin
MediaPlayer1.FileName:="C:\Accident.avi";
MediaPlayer1.Open;
end;

procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
if MediaPlayer1.Mode=mpStopped then begin
MediaPlayer1.Play;
end;
end;

Media Player Найти похожие ветки