使用Delphi显示当前用户的语言


 function GetUsersWindowsLanguage: string;
var
  WinLanguage: array [0..50] of char;
begin
  GetLocaleInfoW(GetUserDefaultUILanguage, LOCALE_SENGLISHDISPLAYNAME, WinLanguage, 50);
  Result := WinLanguage;
end;


联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678