Was bringt dir das abbrechen, wenn du eh komplett runterlaedst? Wenn du das so abarbeitest, dann brauchst du den Code auch nicht in OnWorkEnd zu packen, sondern kannst ihn direkt nach HTTP.get einbauen:
Delphi-Quellcode:
responseStream := TFileStream.Create(speicherpfad+'
Phantom_Zip_v2.exe', fmCreate);
IdHTTP1.Get('
http://phantomzip.ph.funpic.de/Phantom_Zip_v2.exe', responseStream);
responseStream.free;
// Freigeben, schliesst auch das Handle
if abbrechen
then begin
sgauge1.Progress := 100;
deletefile(speicherpfad+'
Phantom_Zip_v2.exe');
// loeschen
end;