Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.15;
Скачать: CL | DM;

Вниз

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

 
Steef   (2004-05-30 15:08) [0]

Как показать при воспроизведении фильма или клипа сколько времени прошло и их длину (час:мин:сек).


 
gyry   (2004-05-30 15:41) [1]

var position, Xb, Sek: integer; Hod: Byte;  

 MediaPlayer1.TimeFormat:=tfMilliseconds;
 position := round(MediaPlayer1.Position/1000);
 Xb := position div 60;
 Sek := position mod 60; // сек
 Hod := Xb div 60;      // час
 Xb := Xb mod 60;       // мин
 Time1.Caption := FormatFloat ("00:", Hod) +
 FormatFloat("00:", Xb) +
 FormatFloat("00", Sek);



Страницы: 1 вся ветка

Текущий архив: 2004.08.15;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.027 c
14-1090925151
Protoss
2004-07-27 14:45
2004.08.15
Какой модем лучше.


1-1091076278
Mental_Ray
2004-07-29 08:44
2004.08.15
Как узнать позицию (не координаты) курсора в RichEdit?


8-1085916829
gyry
2004-05-30 15:33
2004.08.15
книги по работе з файлами мультимедиа


3-1090229620
AlexanderSK
2004-07-19 13:33
2004.08.15
Копирование данных?


1-1091337420
Navi
2004-08-01 09:17
2004.08.15
Code Explorer