in textdateien schreiben

[markon]

doch man kann an eine textdatei ohne sie zu laden anhängen:

Delphi-Quellcode:

var datei:textfile;
 procedure anfuegen_an_ne_textdatei;
begin
 try
  assignfile(datei, 'egal.txt');  { bestehende text-datei }
  append(datei);
  writeln(datei, 'String, der angehängt werden soll...');
  flush(datei);  { ensures that the text was actually written to file }
 finally
  closeFile(datei);
 end;