Einzelnen Beitrag anzeigen

Hawkeye219

Registriert seit: 18. Feb 2006
Ort: Stolberg
2.227 Beiträge
 
Delphi 2010 Professional
 
#4

Re: funktion für Zeitberechnung ohne 24 Stundengrenze

  Alt 4. Nov 2006, 19:01
Hallo MkA2k,

du mußt die Ergebnisse der Berechnung nur richtig interpretieren:

Delphi-Quellcode:
var
  Date1, Date2, Difference : TDateTime;
begin
  Date1 := StrToDateTime('01.11.2006 10:00:00');
  Date2 := StrToDateTime('02.11.2006 12:15:00');
  Difference := Date2 - Date1;
  ShowMessage (IntToStr(Trunc(Difference * 24)) + FormatDateTime(':nn:ss', Difference));
end;
Die Online-Hilfe erklärt, in welchen Format die Daten im Typ Delphi-Referenz durchsuchenTDateTime abgelegt sind.

Gruß Hawkeye
  Mit Zitat antworten Zitat