Главная страница
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.036 c
3-1089979442
AlexanderSK
2004-07-16 16:04
2004.08.15
Несколько одновременных запросов к БД


3-1090417528
vic1
2004-07-21 17:45
2004.08.15
кодировки *dbf


3-1090406510
Fynjy1984
2004-07-21 14:41
2004.08.15
Редактируемый запрос в ADOQuery


11-1078563074
Danil
2004-03-06 11:51
2004.08.15
KOL, MCK и TFontStyle(s)...


1-1091175674
Гость
2004-07-30 12:21
2004.08.15
Как перехватить нажатие...