深藍色論壇 • [轉貼]如何列舉出windows中所有語言及國家

第 1 頁 (共 1 頁)

[轉貼]如何列舉出windows中所有語言及國家

發表於 : 2008年 11月 27日, 18:57

由 tim

轉貼自:
http://delphi.ktop.com.tw/topic.asp?TOPIC_ID=39846

使用 TLanguages 來進行取得.

代碼: 選擇全部

     
    var i:integer; 
      l:TLanguages; 
    begin 
      l:=Languages; 
      for i:=0 to l.Count -1 do 
        Memo1.lines.add(l.ID[i]+' : '+l.Name[i]); 
    end;