Zitat von
f4k3:
mhm ... Also die Funktionen sind nicht schlecht ... aber müsst ich dann nicht auch ...
- HoursBetween()
- MinutesBetween()
- SecondsBetween()
ausführen?
Nein, weil Du die zeitliche Differenz in Sekunden erhälst. Wenn also zw. Start- und Endzeit eine Stunde liegt, liefert die Funktion z.B. 3600 zurück. Mit den Sekunden kannst Du dann aber trivial die von Dir benötigten Werte errechnen:
Delphi-Quellcode:
function GetTimeDifferenceAsString(StartTime, EndTime : TDateTime) : string;
var
TimeDifferenceInSeconds : Integer;
begin
TimeDifferenceInSeconds := SecondsBetween(EndTime, StartTime);
Result := Format('%.2d:%.2d:%.2d',
[TimeDifferenceInSeconds div 3600,
TimeDifferenceInSeconds mod 3600 div 60,
TimeDifferenceInSeconds mod 60]);
end;