|
Registriert seit: 25. Okt 2002
176 Beiträge
Delphi 6 Professional
|
immer schön cremig bleiben :)
29. Nov 2002, 10:54
man hilft wo man kann, viel spaß damit.
kannst das ja auch für deinen nachfolgekalender verwenden.
musst nur den monatsteil tauschen:
If Monat < 12 then
Monat := Monat + 1
else
begin
Monat := 1;
Jahr := Jahr + 1;
end;
viel spaß und immer schön cremig bleiben!
mfg, michael :]
:: don't Panic ::
|