Versuch mal:
Delphi-Quellcode:
{$EXTERNALSYM GetSystemDefaultUILanguage}
function GetSystemDefaultUILanguage: LANGID; stdcall; external kernel32;
{$EXTERNALSYM GetUserDefaultUILanguage}
function GetUserDefaultUILanguage: LANGID; stdcall; external kernel32;
Ich hoffe die Syntax ist so richtig.