Language Support

 Pascal Code 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
 
unit  GetLanguageSupports;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;

type
  TForm6 = 
class (TForm)
    mmo1: TMemo;
    
procedure  FormCreate(Sender: TObject);
  
private
    
{ Private declarations }
  
public
    
{ Public declarations }
  
end ;

var
  Form6: TForm6;

implementation

{$R *.dfm}

procedure  TForm6.FormCreate(Sender: TObject);
var
i: 
Integer ;
begin
    mmo1.Clear;
    
for  i  :=  0   to   Languages.Count - 1    do
    mmo1.Lines.Add(Format(
'%d:%s' ,[i, Languages.Name[i]])) ;

end ;

end .

 

 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
 
0 :Arabic (Saudi Arabia)
1 :Bulgarian (Bulgaria)
2 :Catalan (Catalan)
3 :Chinese (Traditional, Taiwan)
4 :Czech (Czech Republic)
5 :Danish (Denmark)
6 :German (Germany)
7 :Greek (Greece)
8 :English (United States)
9 :Spanish (Spain, Traditional Sort)
10 :Finnish (Finland)
11 :French (France)
12 :Hebrew (Israel)
13 :Hungarian (Hungary)
14 :Icelandic (Iceland)
15 :Italian (Italy)
16 :Japanese (Japan)
17 :Korean (Korea)
18 :Dutch (Netherlands)
19 :Norwegian, Bokmål (Norway)
20 :Polish (Poland)
21 :Portuguese (Brazil)
22 :Romansh (Switzerland)
23 :Romanian (Romania)
24 :Russian (Russia)
25 :Croatian (Croatia)
26 :Slovak (Slovakia)
27 :Albanian (Albania)
28 :Swedish (Sweden)
29 :Thai (Thailand)
30 :Turkish (Turkey)
31 :Urdu (Islamic Republic  of  Pakistan)
32 :Indonesian (Indonesia)
33 :Ukrainian (Ukraine)
34 :Belarusian (Belarus)
35 :Slovenian (Slovenia)
36 :Estonian (Estonia)
37 :Latvian (Latvia)
38 :Lithuanian (Lithuania)
39 :Tajik (Cyrillic, Tajikistan)
40 :Persian
41 :Vietnamese (Vietnam)
42 :Armenian (Armenia)
43 :Azeri (Latin, Azerbaijan)
44 :Basque (Basque)
45 :Upper Sorbian (Germany)
46 :Macedonian (Former Yugoslav Republic  of  Macedonia)
47 :Setswana (South Africa)
48 :isiXhosa (South Africa)
49 :isiZulu (South Africa)
50 :Afrikaans (South Africa)
51 :Georgian (Georgia)
52 :Faroese (Faroe Islands)
53 :Hindi (India)
54 :Maltese (Malta)
55 :Sami, Northern (Norway)
56 :Malay (Malaysia)
57 :Kazakh (Kazakhstan)
58 :Kyrgyz (Kyrgyzstan)
59 :Kiswahili (Kenya)
60 :Turkmen (Turkmenistan)
61 :Uzbek (Latin, Uzbekistan)
62 :Tatar (Russia)
63 :Bengali (India)
64 :Punjabi (India)
65 :Gujarati (India)
66 :Oriya (India)
67 :Tamil (India)
68 :Telugu (India)
69 :Kannada (India)
70 :Malayalam (India)
71 :Assamese (India)
72 :Marathi (India)
73 :Sanskrit (India)
74 :Mongolian (Cyrillic, Mongolia)
75 :Tibetan (PRC)
76 :Welsh (United Kingdom)
77 :Khmer (Cambodia)
78 :Lao (Lao P.D.R.)
79 :Galician (Galician)
80 :Konkani (India)
81 :Syriac (Syria)
82 :Sinhala (Sri Lanka)
83 :Inuktitut (Syllabics, Canada)
84 :Amharic (Ethiopia)
85 :Nepali (Nepal)
86 :Frisian (Netherlands)
87 :Pashto (Afghanistan)
88 :Filipino (Philippines)
89 :Divehi (Maldives)
90 :Hausa (Latin, Nigeria)
91 :Yoruba (Nigeria)
92 :Quechua (Bolivia)
93 :Sesotho sa Leboa (South Africa)
94 :Bashkir (Russia)
95 :Luxembourgish (Luxembourg)
96 :Greenlandic (Greenland)
97 :Igbo (Nigeria)
98 :Yi (PRC)
99 :Mapudungun (Chile)
100 :Mohawk (Mohawk)
101 :Breton (France)
102 :Uyghur (PRC)
103 :Maori (New Zealand)
104 :Occitan (France)
105 :Corsican (France)
106 :Alsatian (France)
107 :Yakut (Russia)
108 :K 'iche (Guatemala)
109 :Kinyarwanda (Rwanda)
110 :Wolof (Senegal)
111 :Dari (Afghanistan)
112 :Scottish Gaelic (United Kingdom)
113 :Arabic (Iraq)
114 :Chinese (Simplified, PRC)
115 :German (Switzerland)
116 :English (United Kingdom)
117 :Spanish (Mexico)
118 :French (Belgium)
119 :Italian (Switzerland)
120 :Dutch (Belgium)
121 :Norwegian, Nynorsk (Norway)
122 :Portuguese (Portugal)
123 :Serbian (Latin, Serbia  and  Montenegro (Former))
124 :Swedish (Finland)
125 :Azeri (Cyrillic, Azerbaijan)
126 :Lower Sorbian (Germany)
127 :Sami, Northern (Sweden)
128 :Irish (Ireland)
129 :Malay (Brunei Darussalam)
130 :Uzbek (Cyrillic, Uzbekistan)
131 :Bengali (Bangladesh)
132 :Mongolian (Traditional Mongolian, PRC)
133 :Inuktitut (Latin, Canada)
134 :Tamazight (Latin, Algeria)
135 :Quechua (Ecuador)
136 :Arabic (Egypt)
137 :Chinese (Traditional, Hong Kong S.A.R.)
138 :German (Austria)
139 :English (Australia)
140 :Spanish (Spain, International Sort)
141 :French (Canada)
142 :Serbian (Cyrillic, Serbia  and  Montenegro (Former))
143 :Sami, Northern (Finland)
144 :Quechua (Peru)
145 :Arabic (Libya)
146 :Chinese (Simplified, Singapore)
147 :German (Luxembourg)
148 :English (Canada)
149 :Spanish (Guatemala)
150 :French (Switzerland)
151 :Croatian (Latin, Bosnia  and  Herzegovina)
152 :Sami, Lule (Norway)
153 :Arabic (Algeria)
154 :Chinese (Traditional, Macao S.A.R.)
155 :German (Liechtenstein)
156 :English (New Zealand)
157 :Spanish (Costa Rica)
158 :French (Luxembourg)
159 :Bosnian (Latin, Bosnia  and  Herzegovina)
160 :Sami, Lule (Sweden)
161 :Arabic (Morocco)
162 :English (Ireland)
163 :Spanish (Panama)
164 :French (Monaco)
165 :Serbian (Latin, Bosnia  and  Herzegovina)
166 :Sami, Southern (Norway)
167 :Arabic (Tunisia)
168 :English (South Africa)
169 :Spanish (Dominican Republic)
170 :Serbian (Cyrillic, Bosnia  and  Herzegovina)
171 :Sami, Southern (Sweden)
172 :Arabic (Oman)
173 :English (Jamaica)
174 :Spanish (Bolivarian Republic  of  Venezuela)
175 :Bosnian (Cyrillic, Bosnia  and  Herzegovina)
176 :Sami, Skolt (Finland)
177 :Arabic (Yemen)
178 :English (Caribbean)
179 :Spanish (Colombia)
180 :Serbian (Latin, Serbia)
181 :Sami, Inari (Finland)
182 :Arabic (Syria)
183 :English (Belize)
184 :Spanish (Peru)
185 :Serbian (Cyrillic, Serbia)
186 :Arabic (Jordan)
187 :English (Trinidad  and  Tobago)
188 :Spanish (Argentina)
189 :Serbian (Latin, Montenegro)
190 :Arabic (Lebanon)
191 :English (Zimbabwe)
192 :Spanish (Ecuador)
193 :Serbian (Cyrillic, Montenegro)
194 :Arabic (Kuwait)
195 :English (Republic  of  the Philippines)
196 :Spanish (Chile)
197 :Arabic (U.A.E.)
198 :Spanish (Uruguay)
199 :Arabic (Bahrain)
200 :Spanish (Paraguay)
201 :Arabic (Qatar)
202 :English (India)
203 :Spanish (Bolivia)
204 :English (Malaysia)
205 :Spanish (El Salvador)
206 :English (Singapore)
207 :Spanish (Honduras)
208 :Spanish (Nicaragua)
209 :Spanish (Puerto Rico)
210 :Spanish (United States)

转载于:https://www.cnblogs.com/kivin/p/4641047.html

  • 1
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值