Einzelnen Beitrag anzeigen

Delphi.Narium

Registriert seit: 27. Nov 2017
2.415 Beiträge
 
Delphi 7 Professional
 
#6

AW: TDate und TTime zu TDateTime wandeln

  Alt 14. Apr 2019, 10:02
DateTime ist eine Gleitkommazahl.

Date ist eine Gleitkommazahl, bei der der Nachkommaanteil = 0 ist.
Time ist eine Gleitkommazahl, bei der der Vorkommaanteil = 0 ist.

Vor dem Komma steht also sowohl bei Date, als auch bei DateTime das Datum, hinter dem Komma stehen bei DateTime und Time die Uhrzeit.

Date := Trunc(DateTime)
Time := Frac(DateTime)

HeutigesDatum := Trunc(Now)
AktuelleUhrzeit := Frac(Now)

Now := HeutigesDatum + AktuelleUhrzeit
  Mit Zitat antworten Zitat