Thema: Delphi mit Zeiten Rechnen

Einzelnen Beitrag anzeigen

Benutzerbild von negaH
negaH

Registriert seit: 25. Jun 2003
Ort: Thüringen
2.950 Beiträge
 
#4

Re: mit Zeiten Rechnen

  Alt 14. Apr 2006, 00:00
Und noch einfacher

Label1.Caption := FormatDateTime('hh:nn:ss', 135.5 / 60 / 24); Denn 135.5 Minuten / 60 Minuten / 24 Stunden sind die Bruchteile eines Tages, und ein TDateTime ist nichts anderes als

TDateTime = Anzahl Tage komma Bruchteile eines Tages

Ein Wert von 0.5 in einem TDateTime ist also exakt 12 Uhr, 0.75 = 3/4tel eines Tages also 18 Uhr.

Du musst also keinerlei Umwege über Stringformatierungen, Datum/Zeit-de-/enkodierungen gehen.

Du kannst also ganz einfach mit Zeiten rechnen:

12 Uhr + 15 Minuten ist

TDateTime( (12 / 24) + (15 / 60 / 24) )

Gruß Hagen
  Mit Zitat antworten Zitat