|
Registriert seit: 10. Jan 2005
Ort: Bönen
1.174 Beiträge
Delphi 11 Alexandria
|
Re: Zeitberechnung mit Tagen
18. Dez 2008, 20:37
Hallo S4SH1981,
Idee:
Das Ergebnis direkt überprüfen ob > 24:
If (Difference * 24) div 24) > 0 then
DaySpan()
(function DaySpan(const ANow: TDateTime; const AThen: TDateTime): Double 
Jürgen
Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)
|