Home » Tipps & Tricks » Object Pascal » Datumswerte » Mit Datumswerten rechnen

Mit Datumswerten rechnen

Es kommt häufig vor, dass man wissen möchte, wie viele Tage zwischen zwei Daten liegen oder welches(Schaltjahre nicht zu vergessen) errechnen zu müssen.Das geht in Delphi relativ einfach – dank des Datentyps TDate.Dazu muss man wissen, ein Wert vom Typ TDate entspricht einer Zahl, die die Anzahl von Tagen seit dem 30.12.1899 repräsentiert.

var datum1, datum2: TDate;
begin
  datum1:=StrToDate('10.03.2000');
  datum2:=now;

  //Differenz zwischen datum1 und datum2 in Tagen
  differenz:=datum2-datum1;

  datum1:=datum2+10;