Textdatei mit TFileStream

[3_of_8]

Naja, also man könnte es, wenn man es doch mit einer StringList lösen will, so machen:

Delphi-Quellcode:

filestream:=TFileStream.create(filename);
strlst:=TStringList.create;
strlst.loadfromstream(filestream);
//String-Veränderung
str:=strlst[0]; //oder was man halt machen will
//Abspeichern
strlst.savetostream(filestream);
//Freigabe
freeandnil(filestream);
freeandnil(strlst);