Hallo Jan,
die Differenz in Tagen zwischen zwei Werten vom Type TDateTime erhälst Du am einfachsten mit der Funktion "DaysBetween" aus der
Unit "DateUtils".
Deklariert ist sie wie folgt:
Code:
[b]function[/b] DaysBetween([b]const[/b] ANow, AThen: TDateTime): Integer;
Beachten solltest Du Folgendes:
Zitat von
Die Delphi-Hilfe:
DaysBetween counts only whole days that have elapsed. Thus, DaysBetween reports the difference between
Dec 31, 1999 11:59 PM and Jan 1, 2000 11:58 PM as 0 because the difference is one minute short of an entire day.
Daniel R. Wolf
mit Grüßen aus Hamburg