Menü

ConvertOemToAnsi (Pascal-Script)

Zurück | Ebene zurück

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 ASCI-Vert
Ä 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:='Hallo';
  S2:=ConvertOemToAnsi(S1);
  ShowMessage(S2);
end;

Regeln zum Nachvollziehen des Scripts finden Sie hier.

Der String-Variablen S1 wird der Text 'DOS-Ärger' 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: Hallo