ConvertOemToAnsi (Pascalscript) #
Beschreibung #
ConvertOemToAnsi konvertiert den angegebenen String OEM-String in einen ANSI-String.
Syntax #
function ConvertOemToAnsi(const S: string): string;
Argumente #
ConvertOemToAnsi wandelt den OEM-String S in einen ANSI-String um. Bei OEM-Strings handelt es sich um die von DOS benutzte Zeichensatzkodierung Codepage 437 bzw. 850. Die Umlaute werden hierbei wie folgt umgesetzt:
Ansi | OEM ASCII |
---|---|
Ä | 142 |
ä | 132 |
Ö | 153 |
ö | 148 |
Ü | 154 |
ü | 129 |
ß | 225 |
Die Umsetzung von ANSI nach OEM ist dann sinnvoll, wenn aus dem Reportgenerator Daten von DOS-Anwendungen importiert werden sollen.
Beispiel #
var
S1: String;
S2: String;
begin
S1:='DOS-Zrger';
S2:=ConvertOemToAnsi(S1);
ShowMessage(S2);
end;
Regeln zum Nachvollziehen des Scripts finden Sie hier.
Der String-Variablen S1 wird der Text ‘DOS-Zrger’ zugewiesen. Die Funktion ConvertOemToAnsi wandelt den Text in Ansi-Zeichen um und weist das Ergebnis der String-Variablen S2 zu. Der Ansi-Text ist nur für Importzwecke von DOS-Anwendungen geeignet.
ShowMessage zeigt: DOS-Ärger