Das liegt bestimmt an dem DateFormat = dfShort ... ich weiß es jetzt zwar nicht genau (kenn diese Komponente kaum), aber ich vermute mal, daß dadurch das Jahr nur 2-stellig gehandhabt wird
und bei 2 stellig geht es halt nur in einem bestimmten Bereich (aktuell wohl zwischen 1950 und 2049 - dieser Bereich kann irgendwo im Programm und Windows eingestellt werden und wird standardmäßig von Windows übernommen), da dort ja die Jahrhundertangabe fehlt.
Du solltest also bei DateFormat etwas mit long verwenden, also die Unterstützung für 4-ställige Jahreszahlen aktivieren.
Dann ist DateTime auch in dem vollen Bereich nutzbar ^^
Code:
TDateTime Double Number of days since 30.12.1899 00:00
01.01.0001 - 31.12.9999 (-693593,99999..2958465,99999)