Datumholen plus berechnen

[mkinzler]

Verwende doch mal die Hilfe oder weßt du nicht wie das funktioniert ?

Zitat von Delphi-Hilfe:

EncodeDate Routine

Gibt einen Wert des Typs TDateTime zurück, der einem bestimmten Jahr, Monat und Tag entspricht.

Namespace
Borland.Vcl.SysUtils

Syntax


[Delphi] function EncodeDate(Year: Word; Month: Word; Day: Word): TDateTime;


Beschreibung
EncodeDate gibt einen Wert des Typs TDateTime für die als Parameter angegebenen Werte Year, Month und Day zurück.

Das Jahr muss zwischen 1 und 9999 liegen.

Für Month sind Werte zwischen 1 und 12 zulässig.

Die zulässigen Werte für Day hängen vom Wert der Eigenschaft Month ab (1 bis 28, 29, 30 oder 31). So liegen beispielsweise die möglichen Tageswerte für den Monat 2 (Februar) zwischen 1 und 28 bzw. zwischen 1 und 29, abhängig davon, ob im Parameter Year ein Schaltjahr übergeben wird.

Befindet sich der angegebene Wert nicht innerhalb der oben aufgeführten Bereiche, löst EncodeDate eine EConvertError-Exception ausgelöst.