Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.015 c
7-25946
Pirate
2003-12-20 15:42
2004.03.09
Друзья! Нужно получить список имен файлов при DragDrop`е.


14-25867
Nous Mellon
2004-02-05 13:30
2004.03.09
О DM-клиенте к любимому форуму


14-25876
Creator
2004-02-17 13:51
2004.03.09
Handle


11-25727
savva
2003-06-20 14:56
2004.03.09
что неверно с TreeView.TVExpand


1-25767
Alexis
2004-02-26 15:27
2004.03.09
Win элементы в Turbo Pascal и Free Pascal