Главная страница
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.022 c
1-25788
skas
2004-02-26 11:19
2004.03.09
Добавление панели выбора цвета


1-25766
Kraj
2004-02-26 15:40
2004.03.09
Преобразование Char в Word


14-25891
Akvilon
2004-02-15 02:04
2004.03.09
Ресурсы


3-25699
Karlson
2004-02-10 19:30
2004.03.09
Обязательное поле, которое стало необязательным :)


1-25734
Islander
2004-02-26 00:59
2004.03.09
Как отловить отмену редактирования ноды?