Windows User Sprache ändern

[yörsch]

Hallo Zusammen,

ich schreibe an userem Setup herrum. Es soll die User-Sprache unter Windows prüfen und wenn nicht ID $407 - Deutsch(Deutschland) eine
Meldung bringen "Bitte die Sprache Deutsch ist einzustellen...."

Mit :
GetLocaleInfoA guck ich nach ob der User in Windows OK ist und mit
ExecAndWait('rundll32.exe shell32.dll,Control_RunDLL intl.cpl', SW_SHOWNORMAL);
kann ich dem Anwender die den Windows Dialog unter die Nase halten. soweit so gut!

Gibt es eine möglichkeit die Einstellungen die im Dialog intl.cpl gemacht werden in Delphi zusetzen?

SetLocaleInfoW(1031, LOCALE_IDEFAULTLANGUAGE , '') führt zu fehlern?!

Mit setLocaleInfo schaffe ich es die einzelen Werte zu FormatSettings zusetzten und verschlimmbessere die aktuelle Sprache
ich will aber die Windows User Sprache verändern!

Danke im Voraus für Infos und Anregungen

Gruß Yörsch