Einzelnen Beitrag anzeigen

xineohp

Registriert seit: 29. Jan 2004
Ort: Heusenstamm
420 Beiträge
 
Delphi 2005 Professional
 
#6

Re: daysbetween, hoursbetween?

  Alt 20. Aug 2004, 11:58
ich hab mir gerade den von dir geposteten Code angeschaut und fest gestellt, dass du ja was (ganz) anderes willst: Nicht die Differenz in Tagen bzw. Stunden, sonden in Tagen und Stunden! sorry, kleines Missverständniss. Das geht dann wie folgt:

Delphi-Quellcode:
var
  TimeA, TimeB: tDatetime;
  Diff: double;
  Rest: double;
  d: integer;
  h: integer;
begin
  Diff := TimeB - TimeA;
  d := Trunc( Diff );
  Rest := Frac( Diff ); // [b]Frac()[/b] liefert den Nachkommateil einer Gleitkommazahl
                         // hier also die Differenz abzüglich der vollen Stunden;
  h := Trunc( Rest*24 );
end;
Peter Enenkel
  Mit Zitat antworten Zitat