Forum: Object-Pascal / Delphi-Language
Delphi
by Fritzew,
22. Feb 2017
Habe gerade noch geschaut wie das in der System.pas tatsächlich gehandelt wird.
Wenn es Dir nur darum geht in ein Textfile mit Write und Writeln zu schreiben reicht es aus bei der Erzeugung des Files
die richtige codepage zu setzen.
Also
procedure StringtoFileTest(const Value : string) ;
Var f : TextFile;
begin
AssignFile(f, 'D:\Test\test.txt');
Forum: Object-Pascal / Delphi-Language
Delphi
by Fritzew,
22. Feb 2017
Tja für das File musst Du natürlich noch festlegen was rausgeht:
Forum: Object-Pascal / Delphi-Language
Delphi
by Fritzew,
22. Feb 2017
Delphi liefert doch alles mit:
Declariere einen Stringtyp für die gewünschte Codepage:
type
oemString = type Ansistring(437) ;
function StringtoOem(const Value : string) : oemString;