Convert ANSI to Oem
Zuletzt geändert: 11.06.2023 21:40

ConvertAnsiToOem (Pascalscript) #

Beschreibung #

ConvertAnsiToOem konvertiert den angegebenen String Ansi-String in einen Oem-String.

Syntax #

function ConvertAnsiToOem(const S: string): string;

Argumente #

ConvertAnsiToOem wandelt den Ansi-String S in einen Oem-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 für DOS-Anwendungen exportiert werden sollen.

Beispiel #

var
  S1: String;
  S2: String;
begin
  S1:='DOS-Ärger';
  S2:=ConvertAnsiToOem(S1);
  ShowMessage(S2);
end;

Regeln zum Nachvollziehen des Scripts finden Sie hier.

Der String-Variablen S1 wird der Text ‘DOS-Ärger’ zugewiesen. Die Funktion ConvertAnsiToOem wandelt den Text in OEM-Zeichen um und weist das Ergebnis der String-Variablen S2 zu. Der OEM-Text ist am Windows-PC nicht sinnvoll darstellbar, sondern nur für Exportzwecke zu DOS-Anwendungen geeignet.

ShowMessage zeigt: DOS-Zrger