integer-werte in eine datei speichern

[Daniel B]

ReWrite überschreibt ja schon die Datei

[Affje]

einfach rewrite eingeben??

[chris01]

So musst du dann die Dateio speichern

Delphi-Quellcode:

try
  AssignFile(f, 'c:\text.txt');
  Rewrite(f);
  WriteLn(''); // Was immer in die Datei muss oder Write(), wenn ein array!!
  CloseFile(f);
end;

[Affje]

aber ich speichere es mit memo1.lines.savetofile.....
geht das dann auch?

[chris01]

Ja!! Dann machst du am besten eine Funktion

Delphi-Quellcode:

procedure speichern(s:Filename);
begin
  DeleteFile(s);
  Memo1.lines.savetofile(s);
end;

Müsste so gehen!!

[Affje]

und dann muss ich s, also den filename defieniern mit 'test.txt', oder??
thx

[chris01]

Korrekt!!
Dann wird die Datei erst gelöscht und danach wird gespeichert!!!

[Affje]

s:= 'test.txt'
.
.
.
ich denke mal, dass ich das alleine hinbekomme, thx

[chris01]

Zitat von Affje:

s:= 'test.txt'

ne,ne!!

speichern('C:\test.txt'); oder

Delphi-Quellcode:

var s:string;

s:='C:\test.txt';
speichern(s);

gruß chris

[Affje]

ihr könnt jetzt endlich an euren sachen weiterarbieten, habe es nochmals n bisschen anders gemacht, aber es geht