label для отображения общего времени трека

[blackstersl]

приет. как сделать так чтобы label3 показывал общее время трека?спасибо

[Ozerich]

А слабо было объяснить какого трека?И что ваще использовать надо?

[blackstersl]

хорошо, например длина аудио трека 03:00 как сделать так чтоб это время показывалось?

[Ozerich]

Label1.caption:='03:00'

[anton14]

function MusicToStr(n: longint): string;
var
s: string;
sec: longint;
min: longint;
begin
sec:=trunc(n/1000);
min:=trunc(sec/60);
sec:=sec-min*60;
s:=inttostr(min);
if sec<10 then s:=s+' : 0'+inttostr(sec)
else s:=s+' : '+ inttostr(sec);
MusicToStr:=s;
procedure TForm1.BeginPlay;
label2.Caption:=MusicToStr(mediaplayer1.Length);
end;

Как то так