Forum: Object-Pascal / Delphi-Language
Delphi
by Bowler,
19. Aug 2004
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.
procedure writeLog(value:string);
var
ferrlog:text;
begin
Assign(ferrlog,'logfile.log');
if fileexists('logfile.log') then
Forum: Object-Pascal / Delphi-Language
Delphi
by Bowler,
19. Aug 2004
Das Problem hatte ich auch mal. Es hängt irgendwie mit den Textfiles zusammen. Bzw. mit dem Typ "textfile". Die sind von Haus aus geschützt. Versuche mal den Befehl Append, um die Datei zu öffnen (anstelle von reset).
PS: wieso wird der Inhalt gelöscht? Müsste der bei Reset nicht bleiben?
Gruß
Christian