Einzelnen Beitrag anzeigen

Benutzerbild von Bowler
Bowler

Registriert seit: 8. Sep 2003
Ort: Bochum
148 Beiträge
 
Delphi XE7 Enterprise
 
#6

Re: In eine Datei was schreiben, wie?

  Alt 19. Aug 2004, 15:03
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;
Christian Rüsken
  Mit Zitat antworten Zitat