StrToDate mit einem passenden FormatSetting. (aber ohne Sturmgewehr, ob das auch funktioniert, wenn keine Trennzeichen dazwischen sind)
Es ist im Windows irgendwo eingestellt, welches Jahr als Grenze gilt.
Aktuell liegt die Grenze noch bei 50 (ich denke mal in den nächsten 20 Jahren wird das auf 75, bzw. bald sogar auf 00 verschoben ... jedenfalls wäre es intelligent, wenn es so wird)
Nachlesen kannst du es in
TFormatSettings.TwoDigitYearCenturyWindow (du kannst es da auch für dein Programm ändern)
oder in den Datumseinstellungen im Windows (oder global für alle Programme ändern)
Und das mit % kann sowieso nicht funktionieren, denn wie formatiert es Delphi/Windows?
https://docwiki.embarcadero.com/Libr...FormatDateTime
https://docs.microsoft.com/de-de/dot...format-strings
Früher war es mal so, dass Delphi garkeine beliebigen FormatStrings als Quelle verwenden konnte,
aber angeblich wurde das zuletzt nun endlich mal repariert.
Niemand hat Extended zu verwenden ... das war niemals zur direkten Verwendung/Speicherung vorgesehn
und spätestens wenn du irgendwas kompilierst, was nicht
Win32 ist, bist du angearscht.
Außerdem
TDateTime = Double