Sprach Liste wo bekommt man die

[venice2]

Hier die Const

Das Problem ist nur das man sich auch darauf nicht verlassen kann jeder macht sein eigenes Ding wie @p80286 schon sagt.
Nur ein Beispiel "GBR, ENG" nach Iso Norm GBR was mir übergeben wird "ENG"

Delphi-Quellcode:

const
  TLANGUAGEISO3166 : Array [0 .. 241] of String =
    ('AD', 'AE', 'AF', 'AG', 'AI', 'AL', 'AM', 'AN', 'AO', 'AR', 'AS', 'AT', 'AU', 'AW', 'AX',
     'AZ', 'BA', 'BB', 'BD', 'BE', 'BF', 'BG', 'BH', 'BI', 'BJ', 'BM', 'BN', 'BO', 'BR', 'BS',
     'BT', 'BV', 'BW', 'BY', 'BZ', 'CA', 'CC', 'CD', 'CF', 'CG', 'CH', 'CI', 'CK', 'CL', 'CM',
     'CN', 'CO', 'CR', 'CS', 'CU', 'CV', 'CX', 'CY', 'CZ', 'DE', 'DJ', 'DK', 'DM', 'DO', 'DZ',
     'EC', 'EE', 'EG', 'EH', 'ER', 'ES', 'ET', 'FI', 'FJ', 'FK', 'FM', 'FO', 'FR', 'GA', 'GB',
     'GD', 'GE', 'GF', 'GH', 'GI', 'GL', 'GM', 'GN', 'GP', 'GQ', 'GR', 'GS', 'GT', 'GU', 'GW',
     'GY', 'HK', 'HM', 'HN', 'HR', 'HT', 'HU', 'ID', 'IE', 'IL', 'IN', 'IO', 'IQ', 'IR', 'IS',
     'IT', 'JM', 'JO', 'JP', 'KE', 'KG', 'KH', 'KI', 'KM', 'KN', 'KP', 'KR', 'KW', 'KY', 'KZ',
     'LA', 'LB', 'LC', 'LI', 'LK', 'LR', 'LS', 'LT', 'LU', 'LV', 'LY', 'MA', 'MC', 'MD', 'ME',
     'MG', 'MH', 'MK', 'ML', 'MM', 'MN', 'MO', 'MP', 'MQ', 'MR', 'MS', 'MT', 'MU', 'MV', 'MW',
     'MX', 'MY', 'MZ', 'NA', 'NC', 'NE', 'NF', 'NG', 'NI', 'NL', 'NO', 'NP', 'NR', 'NU', 'NZ',
     'OM', 'PA', 'PE', 'PF', 'PG', 'PH', 'PK', 'PL', 'PM', 'PN', 'PR', 'PS', 'PT', 'PW', 'PY',
     'QA', 'RE', 'RO', 'RS', 'RU', 'RW', 'SA', 'SB', 'SC', 'SD', 'SE', 'SG', 'SH', 'SI', 'SJ',
     'SK', 'SL', 'SM', 'SN', 'SO', 'SR', 'ST', 'SV', 'SY', 'SZ', 'TC', 'TD', 'TF', 'TG', 'TH',
     'TJ', 'TK', 'TL', 'TM', 'TN', 'TO', 'TR', 'TT', 'TV', 'TW', 'TZ', 'UA', 'UG', 'UK', 'UM',
     'US', 'UY', 'UZ', 'VA', 'VC', 'VE', 'VG', 'VI', 'VN', 'VU', 'WF', 'WS', 'YE', 'YT', 'ZA',
     'ZM', 'ZW');

  TLANGUAGEIOC : Array [0 .. 241] of String =
  ('AND','UAE','AFG','ANT','AIA','ALB','ARM','AHO','ANG','ARG','ASA','AUT','AUS','ARU','ALA',
   'AZE','BIH','BAR','BAN','BEL','BUR','BUL','BRN','BDI','BEN','BER','BRU','BOL','BRA','BAH',
   'BHU','BVT','BOT','BLR','BIZ','CAN','CCK','COD','CAF','CGO','SUI','CIV','COK','CHI','CMR',
   'CHN','COL','CRC','SCG','CUB','CPV','CXR','CYP','CZE','GER','DJI','DAN','DMA','DOM','ALG',
   'ECU','EST','EGY','ESH','ERI','SPA','ETH','FIN','FIJ','FLK','FSM','FRO','FRE','GAB','ENG',
   'GRN','GEO','GUF','GHA','GIB','GRL','GAM','GUI','GLP','GEQ','GRE','SGS','GUA','GUM','GBS',
   'GUY','HKG','HMD','HON','CRO','HAI','HUN','INA','IRL','ISR','IND','IOT','IRQ','IRI','ISL',
   'ITA','JAM','JOR','JPN','KEN','KGZ','CAM','KIR','COM','SKN','PRK','KOR','KUW','CAY','KAZ',
   'LAO','LIB','LCA','LIE','SRI','LBR','LES','LTU','LUX','LAT','LBA','MAR','MON','MDA','MNE',
   'MAD','MHL','MKD','MLI','MYA','MGL','MAC','MNP','MTQ','MTN','MSR','MLT','MRI','MDV','MAW',
   'MEX','MAS','MOZ','NAM','NCL','NIG','NFK','NGR','NCA','DUT','NOR','NEP','NRU','NIU','NZL',
   'OMA','PAN','PER','PYF','PNG','PHI','PAK','POL','SPM','PCN','PUR','PLE','POR','PLW','PAR',
   'QAT', 'REU','ROU','SRB','RUS','RWA','KSA','SOL','SEY','SUD','SWE','SGP','SHN','SLO','SJM',
   'SVK','SLE','SMR','SEN','SOM','SUR','STP','ESA','SYR','SWZ','TCA','CHA','ATF','TOG','THA',
   'TJK','TKL','TLS','TKM','TUN','TGA','TUR','TRI','TUV','TPE','TAN','UKR','UGA','GBR','UMI',
   'USA','URU','UZB','VAT','VIN','VEN','IVB','ISV','VIE','VAN','WLF','SAM','YEM','MYT','RSA',
   'ZAM','ZIM');

Thema ist erledigt!