Edittext speichern

[isilive]

Natürlich musst du den Code von Stift anpassen. Das war nur ein Beispiel.

Du musst am Anfang einlesen:

Delphi-Quellcode:

var myfile : textfile;
s1 : string;
begin
   AssignFile(myfile,'MeineZahl.txt');
   reset(myfile);
   readln(myfile,s1);
   edit1.Text := s1;
   closefile(myfile);
   end;

... Und später einmal schreiben. Ob du das bei Form.destroy oder auf Knopfdruck oder sonstwas machst, kannst du dir aussuchen.

Delphi-Quellcode:

var myfile : textfile;
s1 : string;
begin
   AssignFile(myfile,'MeineZahl.txt');
   Rewrite(myfile);
   WriteLn(myfile,edit1.text);
   closefile(myfile);
end;

Versuche zu verstehen was jede einzelne Zeile macht, dann ist auch klar was wo und warum eingebaut gehört. Dies hier ist auf edit1 zugeschnitten, wenn dein Edit Feld anders heisst, dann ist das natürlich zu ändern.
Was auch noch fehlt ist eine Abfrage ob die Datei überhaupt schon existiert -> fileexists