Registriert seit: 29. Mär 2003
563 Beiträge
Delphi 2006 Architect
|
5. Apr 2003, 20:31
Hallo,
mal daran gedacht die Funktion
YearOf()
function YearOf(const AValue: TDateTime): Word;
Die Funktion gibt das Jahr zurück, das von einem TDateTime-Wert repräsentiert wird.
Zusammen mit:
function DayOfTheYear(const AValue: TDateTime): Word;
Die Funktion gibt die Anzahl der Tage zwischen dem angegebenen TDateTime-Wert und dem 31. Dezember des vorhergehenden Jahres an.
Sollte dies doch auch das Problem lösen?
Gruß
Wolfgang
|