首頁 > 資訊科技 > Delphi開發 > 判斷你的作業系統使用的語系
2009
11-18

判斷你的作業系統使用的語系

如果不想裝 TsiLang元件,只是單純想要判斷作業系統的話,只需要下面的程式碼即可做到

procedure TForm1.FormCreate(Sender: TObject);
var
LanId: word;
begin
lanId := GetSystemDefaultLangID;
if (lanId = 2052) or (lanId = 1028) then
begin
if lanid = 2052 then
ShowMessage('你的電腦是簡體中文');
if lanId = 1028 then
ShowMessage('你的電腦是繁體中文');
end
end;

國家代碼(數字為16進位碼)
阿拉伯語(沙特阿拉伯)=$00000401
保加利亞語=$00000402
加泰隆語=$00000403
中文(台灣)=$00000404
捷克語=$00000405
丹麥語=$00000406
德語(德國)=$00000407
希臘語=$00000408
英語(美國)=$00000409
西班牙語(傳統)=$0000040A
芬蘭語=$0000040B
法語(法國)=$0000040C
希伯來語=$0000040D
匈牙利語=$0000040E
冰島語=$0000040F
意大利語(意大利)=$00000410
日語=$00000411
朝鮮語=$00000412
荷蘭語(荷蘭)=$00000413
挪威語(伯克梅爾)=$00000414
波蘭語=$00000415
葡萄牙語(巴西)=$00000416
羅馬尼亞語=$00000418
俄語=$00000419
克羅地亞語=$0000041A
斯洛伐克語=$0000041B
阿爾巴尼亞語=$0000041C
瑞典語=$0000041D
泰語=$0000041E
土耳其語=$0000041F
烏都語=$00000420
印度尼西亞語=$00000421
烏克蘭語=$00000422
比利時語=$00000423
斯洛文尼亞語=$00000424
愛沙尼亞語=$00000425
拉脫維亞語=$00000426
立陶宛語=$00000427
法斯語=$00000429
越南語=$0000042A
亞美尼亞語=$0000042B
阿塞裡語(拉丁文)=$0000042C
巴士克語=$0000042D
馬其頓語(FYROM)=$0000042F
南非語=$00000436
喬治亞語=$00000437
法羅語=$00000438
印地語=$00000439
馬來語(馬來西亞)=$0000043E
哈薩克語=$0000043F
斯瓦希里語=$00000441
烏茲別克語(拉丁文)=$00000443
塔但語=$00000444
泰米爾語=$00000449
馬拉提語=$0000044E
梵文=$0000044F
孔卡尼語=$00000457
阿拉伯語(伊拉克)=$00000801
中文(中國)=$00000804
德語(瑞士)=$00000807
英語(英國)=$00000809
西班牙語(墨西哥)=$0000080A
法語(比利時)=$0000080C
意大利語(瑞士)=$00000810
荷蘭語(比利時)=$00000813
挪威語(尼諾斯克)=$00000814
葡萄牙語(葡萄牙)=$00000816
塞爾維亞語(拉丁文)=$0000081A
瑞典語(芬蘭)=$0000081D
阿塞裡語(西裡爾文)=$0000082C
馬來語(文萊達魯薩蘭)=$0000083E
烏茲別克語(西裡爾文)=$00000843
阿拉伯語(埃及)=$00000C01
中文(香港特別行政區)=$00000C04
德語(奧地利)=$00000C07
英語(澳大利亞)=$00000C09
西班牙語(國際)=$00000C0A
法語(加拿大)=$00000C0C
塞爾維亞語(西裡爾文)=$00000C1A
阿拉伯語(利比亞)=$00001001
中文(新加坡)=$00001004
德語(盧森堡)=$00001007
英語(加拿大)=$00001009
西班牙語(危地馬拉)=$0000100A
法語(瑞士)=$0000100C
阿拉伯語(阿爾及利亞)=$00001401
中文(澳門特別行政區)=$00001404
德語(列支敦士登)=$00001407
英語(新西蘭)=$00001409
西班牙語(哥斯達黎加)=$0000140A
法語(盧森堡)=$0000140C
阿拉伯語(摩洛哥)=$00001801
英語(愛爾蘭)=$00001809
西班牙語(巴拿馬)=$0000180A
法語(摩納哥)=$0000180C
阿拉伯語(突尼斯)=$00001C01
英語(南非)=$00001C09
西班牙語(多米尼加共和國)=$00001C0A
阿拉伯語(阿曼)=$00002001
英語(牙買加)=$00002009
西班牙語(委內瑞拉)=$0000200A
阿拉伯語(也門)=$00002401
英語(加勒比海)=$00002409
西班牙語(哥倫比亞)=$0000240A
阿拉伯語(敘利亞)=$00002801
英語(伯利茲)=$00002809
西班牙語(秘魯)=$0000280A
阿拉伯語(約旦)=$00002C01
英語(特立尼達)=$00002C09
西班牙語(阿根廷)=$00002C0A
阿拉伯語(黎巴嫩)=$00003001
英語(津巴布韋)=$00003009
西班牙語(厄瓜多爾)=$0000300A
阿拉伯語(科威特)=$00003401
英語(菲律賓)=$00003409
西班牙語(智利)=$0000340A
阿拉伯語(阿聯酋)=$00003801
西班牙語(烏拉圭)=$0000380A
阿拉伯語(巴林)=$00003C01
西班牙語(巴拉圭)=$00003C0A
阿拉伯語(卡塔爾)=$00004001
西班牙語(玻利維亞)=$0000400A
西班牙語(薩爾瓦多)=$0000440A
西班牙語(洪都拉斯)=$0000480A
西班牙語(尼加拉瓜)=$00004C0A
西班牙語(波多黎各)=$0000500A

最後修改日:
作者:蔡 小翰

常見問題:

  1. 文章可以轉貼嗎?可以,不過請要註明出處並標示本站連結。
  2. 載點可以轉貼嗎?可以,歡迎隨意盜連,無須告知。
  3. 反盜版聲明:本站支持正版軟體,請勿討論破解版、快樂版、註冊碼、註冊機、序號...等違法主題。
  4. 檔案無法解壓縮或解壓縮時發生錯誤?請使用7-Zip解壓縮
  5. 更多細節請參閱使用條款及免責聲明


發表迴響