@Sir Rufo, okey, also einfach nur
Reset(Speicher)
? Aber das verstehe ich jetzt nicht
Oder doch... also dann ändere ich jetzt den Code zu:
Delphi-Quellcode:
procedure TForm1.Speichern;
var Speicher: Textfile;
GesH:Integer;
begin
GesH:=0;
AssignFile(Speicher,'Speicher.txt');
Reset(Speicher);
Readln(Speicher,GesH);
GesZ:=GesH + GesZ;
Rewrite(Speicher);
Writeln(Speicher,GesZ);
CloseFile(SPeicher);
end;
Okey, mit AssignFile weise ich also der Variablen Speicher einfach Speicher.txt zu?! Und wie kann ich jetzt eine Text Datei erstellen? o.0