| Hauptmenü | |||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|
|
| Differenz zwischen zwei Datums-Werten berechnen |
|
|
| Geschrieben von Lemmy | |
| Sonntag, 19. Februar 2006 | |
|
Datums- und Zeitwerte werden im Datentyp TDateTime gespeichert, dieser ist wiederum vom Typ Double.Dabei handelt es sich um eine Kommazahl die folgenden (eigentlich einfachen) Aufbau besitzt: Im ganzzahligen Anteil wird das Datum als die Anzahl der Tage seit dem 30.12.1899 gespeichert. Im Nachkommateil wird die Zeit als Teil eines Tages gespeichert (also entspricht 0.5 12:00 h). Um also die Anzahl der Tage zwischen zwei Daten (=Mehrzahl von Datum) zu ermitteln, braucht man nur die Differenz der ganzzahligen Anteile der Datumswerte zu bilden. Var Datum1, Datum2 :TDateTime; Differenz :Real; ... Datum1:=StrToDate('14.03.2002'); Datum2:=StrToDate('10.03.2002'); Differenz:=Datum1-Datum2; //oder die Differenz zum aktuellen Datum (Date) ermitteln: Differenz:=Date-Datum1; |
|
| Letzte Aktualisierung ( Sonntag, 19. Februar 2006 ) |
| < Zurück | Weiter > |
|---|