Integer in Zeit wert übernehmen und ausgeben?

[Flom]

Huhu,
Ich möchte nun die gesamt Zeit von allen MP3s ausgeben mit Hilfe der Funktion und hatte gedacht das es vielleicht so geht:

Delphi-Quellcode:

function FormatSeconds2 (seconds: Cardinal): string;
begin
  Result := FormatDateTime('hh:nn:ss', seconds / SecsPerDay);
end;

Aber leider nein. Wie kann ich es machen? Addieren lass ich es so:
dauer:=dauer+aAudioFile.Dauer;

die Ausgabe dann so:

Delphi-Quellcode:

LabelZeit.Visible:=True;
Zeit2 := Time;
LabelZeit.Caption:= 'Dauer der Suche: '+TimeToStr(Zeit2 - Zeit);