Textdatei mit Inhalt erstellen

[Apollonius]

Mit den Pascal-Routinen geht es ebenso schnell:

Delphi-Quellcode:

var f: Textfile;
begin
  AssignFile(f, 'C:\rkjhgkrh.txt');
  Rewrite(f);
  try
    Writeln(f, 'dhekhg kwhckghwghucwr ');
    Writeln(f, 'guzwe vluizgwzw zcu5gz');
  finally
    CloseFile(f);
  end;
end;