@@ -374,8 +374,6 @@ begin
374374 Items.Add(' BY-CR - Belarusian (Cyrillic)' );
375375 Items.Add(' BY-LT - Belarusian (Latin)' );
376376 Items.Add(' CA - Català' );
377- Items.Add(' CHS - Chinese Simplified' );
378- Items.Add(' CHT - Chinese Traditional' );
379377 Items.Add(' CZ - Czech' );
380378 Items.Add(' DE -UML - German' );
381379 Items.Add(' Default / Do not change current language' );
@@ -414,7 +412,9 @@ begin
414412 Items.Add(' UK - Ukrainian' );
415413 Items.Add(' UZ - Uzbek' );
416414 Items.Add(' VN - Vietnamese' );
417- ItemIndex := 9;
415+ Items.Add(' ZH -CN - Chinese Simplified' );
416+ Items.Add(' ZH -HANT - Chinese Traditional' );
417+ ItemIndex := 7;
418418 end;
419419 if (GetWindowsVersion < $06000000) then ComboBox1.visible:=false;
420420
@@ -427,47 +427,47 @@ begin
427427 ' BY-CR ' ,' BY' : i:=2;
428428 ' BY-LT ' : i:=3;
429429 ' CA ' : i:=4;
430- ' CHS ' , ' CH ' : i:=5;
431- ' CHT ' : i:=6;
432- ' CZ ' : i:=7;
433- ' DE -UML ' , ' DE ' : i:=8;
434- ' DEFAULT ' : i:=9;
435- ' EN ' : i:=10;
436- ' EN -GB ' : i:=11;
437- ' ES - ES ' , ' ES ' : i:=12;
438- ' ES - LA ' : i:=13;
439- ' EU ' : i:=14;
440- ' FA ' : i:=15;
441- ' FI ' : i:=16;
442- ' FR ' : i:=17;
443- ' GL ' : i:=18;
444- ' GR ' : i:=19;
445- ' HE ' : i:=20;
446- ' HU ' : i:=21;
447- ' HY ' : i:=22;
448- ' ID ' : i:=23;
449- ' IT ' : i:=24;
450- ' JA ' : i:=25;
451- ' KO ' : i:=26;
452- ' LV ' : i:=27;
453- ' NL ' : i:=28;
454- ' NO ' : i:=29;
455- ' PL ' : i:=30;
456- ' PT - BR ' : i:=31;
457- ' PT - PT ' , ' PT ' : i:=32;
458- ' RO ' : i:=33;
459- ' RU ' : i:=34;
460- ' SI ' : i:=35;
461- ' SK ' : i:=36;
462- ' SL ' : i:=37;
463- ' SV ' : i:=38;
464- ' TJ ' : i:=39;
465- ' TR ' : i:=40;
466- ' TT ' : i:=41;
467- ' UK ' : i:=42;
468- ' UZ ' : i:=43;
469- ' VN ' : i:=44;
470- else i:=9 ;
430+ ' CZ ' : i:=5;
431+ ' DE -UML ' , ' DE ' : i:=6;
432+ ' DEFAULT ' : i:=7;
433+ ' EN ' : i:=8;
434+ ' EN -GB ' : i:=9;
435+ ' ES - ES ' , ' ES ' : i:=10;
436+ ' ES - LA ' : i:=11;
437+ ' EU ' : i:=12;
438+ ' FA ' : i:=13;
439+ ' FI ' : i:=14;
440+ ' FR ' : i:=15;
441+ ' GL ' : i:=16;
442+ ' GR ' : i:=17;
443+ ' HE ' : i:=18;
444+ ' HU ' : i:=19;
445+ ' HY ' : i:=20;
446+ ' ID ' : i:=21;
447+ ' IT ' : i:=22;
448+ ' JA ' : i:=23;
449+ ' KO ' : i:=24;
450+ ' LV ' : i:=25;
451+ ' NL ' : i:=26;
452+ ' NO ' : i:=27;
453+ ' PL ' : i:=28;
454+ ' PT - BR ' : i:=29;
455+ ' PT - PT ' , ' PT ' : i:=30;
456+ ' RO ' : i:=31;
457+ ' RU ' : i:=32;
458+ ' SI ' : i:=33;
459+ ' SK ' : i:=34;
460+ ' SL ' : i:=35;
461+ ' SV ' : i:=36;
462+ ' TJ ' : i:=37;
463+ ' TR ' : i:=38;
464+ ' TT ' : i:=39;
465+ ' UK ' : i:=40;
466+ ' UZ ' : i:=41;
467+ ' VN ' : i:=42;
468+ ' CHS ' , ' CH ' , ' ZH ' , ' ZH -CN ' : i:=43;
469+ ' CHT ' , ' ZH -HANT ' : i:=44;
470+ else i:=7 ;
471471 end;
472472 if i>=0 then
473473 combobox1.itemindex:=i;
@@ -3123,46 +3123,46 @@ case combobox1.itemindex of
31233123 2 : slang:= ' by-cr.txt' ;
31243124 3 : slang:= ' by-lt.txt' ;
31253125 4 : slang:= ' ca.txt' ;
3126- 5 : slang:= ' chs .txt' ;
3127- 6 : slang:= ' cht .txt' ;
3128- 7 : slang:= ' cz.txt ' ;
3129- 8 : slang:= ' de-uml .txt' ;
3130- 9 : slang:= ' *nochange ' ;//do not change
3131- 10 : slang:= ' en .txt' ;
3132- 11 : slang:= ' en-gb .txt' ;
3133- 12 : slang:= ' es-es .txt' ;
3134- 13 : slang:= ' es-la .txt' ;
3135- 14 : slang:= ' eu .txt' ;
3136- 15 : slang:= ' fa .txt' ;
3137- 16 : slang:= ' fi .txt' ;
3138- 17 : slang:= ' fr .txt' ;
3139- 18 : slang:= ' gl .txt' ;
3140- 19 : slang:= ' gr .txt' ;
3141- 20 : slang:= ' he .txt' ;
3142- 21 : slang:= ' hu .txt' ;
3143- 22 : slang:= ' hy .txt' ;
3144- 23 : slang:= ' id .txt' ;
3145- 24 : slang:= ' it .txt' ;
3146- 25 : slang:= ' ja .txt' ;
3147- 26 : slang:= ' ko .txt' ;
3148- 27 : slang:= ' lv .txt' ;
3149- 28 : slang:= ' nl .txt' ;
3150- 29 : slang:= ' no .txt' ;
3151- 30 : slang:= ' pl .txt' ;
3152- 31 : slang:= ' pt-br .txt' ;
3153- 32 : slang:= ' pt-pt .txt' ;
3154- 33 : slang:= ' ro .txt' ;
3155- 34 : slang:= ' ru .txt' ;
3156- 35 : slang:= ' si .txt' ;
3157- 36 : slang:= ' sk .txt' ;
3158- 37 : slang:= ' sl .txt' ;
3159- 38 : slang:= ' sv .txt' ;
3160- 39 : slang:= ' tj .txt' ;
3161- 40 : slang:= ' tr .txt' ;
3162- 41 : slang:= ' tt .txt' ;
3163- 42 : slang:= ' uk .txt' ;
3164- 43 : slang:= ' uz .txt' ;
3165- 44 : slang:= ' vn .txt' ;
3126+ 5 : slang:= ' cz .txt' ;
3127+ 6 : slang:= ' de-uml .txt' ;
3128+ 7 : slang:= ' *nochange ' ;//do not change
3129+ 8 : slang:= ' en .txt' ;
3130+ 9 : slang:= ' en-gb.txt ' ;
3131+ 10 : slang:= ' es-es .txt' ;
3132+ 11 : slang:= ' es-la .txt' ;
3133+ 12 : slang:= ' eu .txt' ;
3134+ 13 : slang:= ' fa .txt' ;
3135+ 14 : slang:= ' fi .txt' ;
3136+ 15 : slang:= ' fr .txt' ;
3137+ 16 : slang:= ' gl .txt' ;
3138+ 17 : slang:= ' gr .txt' ;
3139+ 18 : slang:= ' he .txt' ;
3140+ 19 : slang:= ' hu .txt' ;
3141+ 20 : slang:= ' hy .txt' ;
3142+ 21 : slang:= ' id .txt' ;
3143+ 22 : slang:= ' it .txt' ;
3144+ 23 : slang:= ' ja .txt' ;
3145+ 24 : slang:= ' ko .txt' ;
3146+ 25 : slang:= ' lv .txt' ;
3147+ 26 : slang:= ' nl .txt' ;
3148+ 27 : slang:= ' no .txt' ;
3149+ 28 : slang:= ' pl .txt' ;
3150+ 29 : slang:= ' pt-br .txt' ;
3151+ 30 : slang:= ' pt-pt .txt' ;
3152+ 31 : slang:= ' ro .txt' ;
3153+ 32 : slang:= ' ru .txt' ;
3154+ 33 : slang:= ' si .txt' ;
3155+ 34 : slang:= ' sk .txt' ;
3156+ 35 : slang:= ' sl .txt' ;
3157+ 36 : slang:= ' sv .txt' ;
3158+ 37 : slang:= ' tj .txt' ;
3159+ 38 : slang:= ' tr .txt' ;
3160+ 39 : slang:= ' tt .txt' ;
3161+ 40 : slang:= ' uk .txt' ;
3162+ 41 : slang:= ' uz .txt' ;
3163+ 42 : slang:= ' vn .txt' ;
3164+ 43 : slang:= ' zh-cn .txt' ;
3165+ 44 : slang:= ' zh-hant .txt' ;
31663166 else slang:= ' ' ;
31673167end;
31683168if slang<>' ' then
0 commit comments