Thema: Delphi 2 TDate -> 1 Tdate

Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#2

Re: 2 TDate -> 1 Tdate

  Alt 2. Feb 2007, 17:58
das einfachste ist einfach Datum + Zeit (weil Datum ja der Vorkommateil ist und Zeit der Nachkommateil).
Um zu verhindern das da jeweils noch ein falsches Datum oder eine falsche Zeit addiert werden kann man die Funktionen Trunc und Frac nutzen
DatumZeit := Trunc(Datum) + Frac(Zeit);
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat