Konsolenanwendung Zeichensatz

[Martin K]

Okay, so geht's:

Delphi-Quellcode:

{...}
  s1 := 'ä';
  SetLength(s2, Length(s1));
  CharToOEM( PChar(s1), PChar(s2));
  WriteLn(s2);

Aber ich würde es gerne mit der anderen Methode machen, dass die Strings im Quellcode direkt im DOS-Zeichensatz formatiert sind.
Also wenn ich eingebe:
  WriteLn('ä'); ...dann soll das auch so in der Ausgabe meiner Konsole richtig stehen...