Laufendes Programm Speichern (savetofile)

[Felix015]

Hi,
du musst nicht jedesmal

Delphi-Quellcode:

assignfile (...);
rewrite(...);
writeln(...);
writeln(...);
closefile(...);

schreiben.

Kurze Erklärung zu dem Code:
- Assignfile verknüpft eine Variable mit einer Textdatei. In den Klammern musst du zuerst die Variable angeben, dann den Pfad der Textdatei.

Delphi-Quellcode:

var 
f : textfile;
begin
assignfile(f{Variable},C:\{Pfad der Textdatei});
end;

- Dann musst du die Datei öffnen. Wie das hängt davon ab was du machen willst. Mit rewrite öffnest du die einfach so zum schreiben. Mit append würdest du weitere Zeichen Anfügen. Mit reset öffnest du eine Datei nur zum lesen
In Klammern kommt immer die Variable.

-Dann kannst du mit der Datei arbeiten:
writeln schreibt eine Zeile mit von dir angegebenen Text
readln liest eine Zeile aus(du kannst nicht bestimmen welche Zeile ausgelesen wird, du kannst nur von vorne beginnen)
writeln(f,'Dies steht jetzt in der Textdatei'); würde eine neue Zeile erstellen in der obiges steht.
Jetzt kannst du aber auch noch weitere Sachen machen(aber nur so , wie du die Datei geöffnet hast, wenn du datei mit reset(f) geöffnet hast, kannst du nichts schreiben)
Du könntest beliebig viele writeln's bzw readln's machen, das heißt du musst nicht immer assignfile und die öffnemethode davorschreiben

- zum schluss nicht vergessen die Verknüpfung mit der Variablen aufzuheben
closefile(f); mfg Felix