Registriert seit: 15. Aug 2007
Ort: Nürnberg
313 Beiträge
Delphi 2007 Architect
|
Re: Differenz zwischen zwei Zeitwerten im Format 'hh:nn:ss'
8. Jun 2009, 16:19
Zitat von 0xF30FC7:
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;
Habs mal ausprobiert geht auch
Danke für die Lösung.
f4k3
Sascha
|
|
Zitat
|