Herzlich willkommen in der Delphi-PRAXiS, guitarre.
Dich dürften die
WIN32 API Funktionen GetSystemDefaultLCID() bzw. GetUserDefaultLCID() interessieren. Diese Funktionen liefern dir die definierten Konstanten. Wenn du diese Konstanten noch in einen String übersetzen möchtest, dann ist weiterer Aufwand zu treiben.
Freundliche Grüße vom marabu