Zitat von
eLse-maestro:
... und ich wusste nicht das man vor dem lesen erst den filestream wieder freigeben muss ...
Das interpretierst du falsch, es geht natürlich auch so:
Delphi-Quellcode:
begin
// ...
fs.Position := 0;
// fs.Free;
// fs := TFileStream.Create(fn, fmOpenRead);
// ...
end;
Durch fs.Free wird der Stream aber auf die Festplatte geschrieben.