Wenn du
Delphi-Quellcode:
var fs:tfilestream; s,s1:string;i:integer;
begin
fs:=tfilestream.Create('C:\background.exe',
fmOpenReadWrite or fmShareExclusive);
try
i:=fs.Seek(0, soFromEnd);
s:='[test]';
fs.Write(s,sizeOf(s));
s:=''; // hier s leerst
fs.Seek(i, soFromBeginning);
fs.Read(s1,sizeOf(s1));
showmessage(s1);
finally
fs.Free;
end;
wirst du merken, dass die Funktion nicht wirklich das macht was du erwartest...
Strings in Delphi könnte man auch vereinfacht als Zeiger auf einen Adressbereich sehen. Du schreibst also nicht die Zeichenkette in die Datei, sondern den Zeiger darauf.
MfG,
Bug