Текущий архив: 2004.03.09;
Скачать: CL | DM;
Вниз
MediaPlayer Найти похожие ветки
← →
Crite © (2003-11-06 20:10) [0]Ребята помогите разобраться.
procedure TForm3.FormCreate(Sender: TObject);
begin
MediaPlayer1.Open;
MediaPlayer1.TimeFormat:=tfMilliseconds;
Timer1.Interval:=MediaPlayer1.Length;
MediaPlayer1.Play;
end;
По клику на кнопке главной формы создаёться форма в которой проигрывается AVI-клип, по завершению которого она закрываеться.Закрывает её таймер.Глюк в том, что каждый раз при открытии формы интервал таймера почему-то имеет разное значение и всегд меньшее чем длинна клипа.Объясните пожалуйста, в чём ошибка.
Заране спасибо.
← →
Mihey © (2003-11-06 21:06) [1]Стандартный таймер очень неточен, он не отражает реальное время. А твою задачу нужно решать по другому. При завершении проигрывания медиаплеер генерирует событие OnNotify.
← →
Думкин © (2003-11-07 05:19) [2]Генерирует. Но у меня при проигрывании МПЕГ файлов бывало такое -
приходим в событие - а флаг не mpStopped, а mpPlaying.
Страницы: 1 вся ветка
Текущий архив: 2004.03.09;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.045 c
