Windows system language/de
From Free Pascal wiki
Jump to navigationJump to search
│
Deutsch (de) │
Dieser Artikel beschäftigt sich mit der Windowsprogrammierung.
Die Prozedur ermittelt die aktuelle Systemsprache von Windows.
uses
Windows, ...;
...
function funWindowsSprache:String;
var
chrCountry: array [0..255] of char;
begin
GetLocaleInfo(GetSystemDefaultLCID, LOCALE_SLANGUAGE,
chrCountry, SizeOf(chrCountry) - 1);
Result := chrCountry;
end;
...
--Olaf 07:55, 28 May 2013 (UTC)
