datei "verändern"...

[Luckie]

Gegenbeweis:

Delphi-Quellcode:

var
  f : TextFile;
begin
  AssignFile(f, 'c:\test.txt');
  Append(f);
  writeln(f, 'World');
  CloseFile(f);

[Chewie]

Und wenn ich das mache, steht in der Datei nicht dasselbe, sondern "test" und ein Zeilenumbruch mehr.
Keine Ahnung, was du da machst, dein Code ist richtig.

[Blizzard]

nim doch einfach ne tstringlist da sind die ganze routinen schon implementiert

Delphi-Quellcode:

var list:tstringlist;
begin
 list:=tstringlist.create;
 list.loadfromfile('c:\test.txt');
 list.add('Füge was hinzu');
 list[3]:='Ändere die 4-te zeile';
 list.savetofile('c:\test.txt');
 list.free;
end;

mfg
Blizzard

[edit]dumme tippfehler[/edit]

[Luckie]

Wo ist der Ressourcenschutzblock (try-finaly)?

[Leathl]

Zitat von Blizzard:

nim doch einfach ne tstringlist da sind die ganze routinen schon implementiert

Delphi-Quellcode:

var list:tstringlist;
begin
 list:=tstringlist.create;
 list.loadfromfile('c:\test.txt');
 list.add('Füge was hinzu');
 list[3]:='Ändere die 4-te zeile';
 list.savetofile('c:\test.txt');
 list.free;
end;

mfg
Blizzard

[edit]dumme tippfehler[/edit]

mit einer tstringlist hab ich das vorher schonmal probiert...

Zitat von Leathl:

mit ner stringlist hab ichs auch schon versucht, aber da funktioniert was nicht... er hat immer die letzte und die hälfte der vorletzteb zeile gelöscht...

hmm... komisch


//also ich benutze das immer bei crypted files... bei ner normalen txt klappts... hmm

[Leathl]

habs geschafft

thx an alle

[Luckie]

Ein Moment: "crypted files"? Solche Dateien sind wohl wie binär Dateien zu handhaben, da sie auch Steuerzeichen usw. enthalten können. Da kann das nicht funktionieren.

[Blizzard]

ne tstringlist frist meiner erfahrung nach alles bis auf den hexwert 00 da bricht sie ab weil sie beim einlesen wohl mit nem 0-terminierten string arbeitet und da 0x00 als stringende gilt

wobei ich bei "crypted files" doch auch eher mit nem filestream arbeiten würde

Blizzard

[Leathl]

ja...

ich habs auch im letzten moment bemerkt und mich besonnen, es anders zu machen *G* ... klappt ja jetzt

cYa
Leathl