problem bei "selbstgerschriebenem" decodedate...

[marabu]

result := I * 365 + I div 4 - I div 100 + I div 400 + Day - 693594; Du berechnest in deiner Routine EncodeDate() zuerst die Gesamttage seit Beginn der Zeitrechnung - das ist zwar vom Ergebnis nicht ganz richtig, aber sei's drum. Zuletzt rechnest du durch Subtraktion von 693594 Tagen das Ergebnis in die Zahl der Tage seit dem 31.12.1899 um.

Warum? In deiner Routine DecodeDate() gehst du doch davon aus, das das übergebene Datum die Zahl der Tage seit dem 1.1.0001 ist!

Habe ich mich jetzt verständlicher ausgedrückt?

marabu