Moin DPler,
unter
TP gab es die Funktion
GetDate, die aus dem heutigen Datum
Jahr,Monat,Tag und Wochentag als
Word zurückgab.
Das habe ich mir provisorisch ersmal so gebastelt:
Delphi-Quellcode:
s:=FormatDateTime('d,m,y',date);
s:=datetostr(date);
d:=StrToInt(copy(s,1,2));
m:=StrToInt(copy(s,4,2));
y:=StrToInt(copy(s,7,4));
Geht das auch weniger umständlich?
Gruß
Wolfgang