windows media player

← →
sd (2003-05-09 12:54) [0]

работа с windows media player надо выводить полное и текущее время воспроизведения файла на TLABEL компоненту в формате {00:00:00}.
Нужен код.

← →
reticon © (2003-05-09 22:58) [1]

Общее время воспроизведения (сек):

...

Time:=MediaPlayer.Length;
Label:=mci_msf_Second(Time);

...

Текущее время:

procedure TForm1.ShowCurrentTime;
begin
m := mci_Tmsf_Minute(MediaPlayer1.Position); // минуты
s := mci_Tmsf_Second(MediaPlayer1.Position); // секунды
Label1.Caption := Format("%dm %ds";, [m, s]);
Gauge1.Progress := (60 * m) + s; //обновление индикатора
end;

mci_hms_Hour() -> возвращает часы

не забудь uses MMSystem

← →
sd (2003-05-11 16:28) [2]

это не то. Нужен код для вывода времени от WMP 2 OCX файла.

windows media player Найти похожие ветки