In eine Datei was schreiben, wie?

[Bowler]

Korrekt @toxman. Habe ich auch gerade nochmal nachgeguckt.

Das Folgende ich eine Funktion, welche einfach eine Text-Datei öffnet und am Ende eine Zeile anhängt. Die ist schon im Einsatz und funktioniert.

Delphi-Quellcode:

procedure writeLog(value:string);
var
     ferrlog:text;
begin
   Assign(ferrlog,'logfile.log');
   if fileexists('logfile.log') then
      append(ferrlog)
   else
      rewrite(ferrlog);
   writeln(ferrlog,value);
   Close(ferrlog);   
end;