zahl in text-datei speichern und wieder draufzugreifen?

[Klaus01]

Genau, dann ist es egal bzw. gleich den Anfang ist dann gleich Ende.

Überschreiben:

Das sollte so gehen:

Delphi-Quellcode:

var 
  sl: TStringList; 

// schreiben 
sl:=TStringList.create; 
sl.loadfromFile('DeinDatei'); 
sl.sl[sl.count -1]:=intToStr(DeinZahl); 
sl.saveToFile('DeineDatei'); 

// lesen 
sl.loadfromFile('DeineDatei'); 
DeinZahl:=StrToInt(sl[sl.count -1]); 

FreeAndNil(sl);

oder so:

Delphi-Quellcode:

var t : textfile; 
begin 
  assignfile(t,'c:\file.txt'); 
  rewrite(t); 
  writeln(t,'Text'); 
  closefile(t); 
end;

Grüße
Klaus