Einzelnen Beitrag anzeigen

Felix015

Registriert seit: 2. Okt 2008
16 Beiträge
 
#9

Re: Laufendes Programm Speichern (savetofile)

  Alt 7. Mär 2009, 17:57
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
  Mit Zitat antworten Zitat