hallo,
ich verstehe nicht warum dieser code
Delphi-Quellcode:
fileDatei:=nil;
if not FileExists(strLocalFile) then begin
fileDatei := TFileStream.Create(strLocalFile, fmCreate);
end else begin
fileDatei := TFileStream.Create(strLocalFile, fmOpenReadWrite);
innerhalb der Schleife steht (oder wie auch immer du das mittlerweilen geändert hast). Würde es nicht reichen, wenn du einmal überprüfst, ob die Datei bereits vorhanden ist?
mfg