Wieso den Umweg über
VarToDateTime, oder hast du etwas gegen
StrToDateTime?
Du ließt die Systemwerte in orginales_datumsformat ein und veränderst diese Variable.
Gefunden hab ich aber nur die Deklaration für neues_datumsformat.
Außerdem setzt du nirgendwo die geänderten Werte, bzw. weißt sie nirgends zu, so daß sie verwendet werden könnten.
PS: StrToDateTime kann man die FormatSettings auch direkt mitgeben, ohne sie (programm)global ändern zu müssen.
@implementation: Man kann (zumindestens in Delphi funktioniert es ganz gut) auch vorhandene Funktionen nutzen und muß nicht unbedingt alles selber machen.
Man muß nur eben die richtigen Funktionen nutzen, bzw. den verwendeten Funktionen auch dir richtigen Einstellungen geben.
Also noch auf Sir Rufo hören oder zumindestens die FormatSettings selber befüllen.
(LOCALE_SYSTEM_DEFAULT = aktuelle Systemeinstellung, aber alternativ kann man nur was auslesen, welches auch installiert ist, also nicht unbedingt blind drauf verlassen, daß es andere Sprachen überhaupt gibt.)