Ausgabe in Datei

[Michael Habbe]

Zitat von the_source:

Wie kann ich erreichen, dass der Inhalt der Variable in eine Datei geschrieben wird, so dass ich dann z.B. eine txt-Datei habe in der die Ausgaben aufgelistet sind?

Na, ganz einfach:

Delphi-Quellcode:

procedure LogToFile(s: String);
var
  f: Textfile;
begin
  AssignFile(f, 'c:\log.txt');     // Datei mit Variable verbinden
  if FileExists('c:\log.txt') then // Datei vorhanden?
    Append(f)                      // Datei zum Schreiben öffnen 
  else
    Rewrite(f);                    // Datei erstellen und öffnen
  WriteLn(f, s);                   // Übergebenen Text schreiben
  CloseFile(f);                    // Datei schließen
end;