XProfan

Source wurde am 15.07.2007 aus der MMJ-Quellcodesammlung (Dietmar Horn) in die Babyklappe auf XProfan.Com abgelegt:
Zeichensatz: Aktuelle Ansi-Codepage ermitteln
GetACP ermittelt die aktuelle ANSI Codepage.
Hier die Übersetzungstabelle:
874  Thailand
932  Japan
936  Chinesisch (PRC, Singapur)
949  Korea
950  Chinesisch (Taiwan,Hong Kong)
1200  Unicode (BMP of ISO 10646)
1250  Windows 3.1 Eastern European
1251  Windows 3.1 Cyrillisch
1252  Windows 3.1 Latin 1 (US,Western Europe)
1253  Windows 3.1 griechisch
1254  Windows 3.1 türkisch
1255  hebräisch
1256  arabisch
1257  baltisch
Def @Getacp(0) !kernel32,GetACP
Print @Getacp()