Hmm..
Delphi-Quellcode:
procedure THTTPObject.FOnWork(ASender: TObject; AWorkMode: TWorkMode; AWorkCount: Int64);
begin
if FCanceled
then
begin
raise Exception.Create('
Disconnect');
Disconnect;
end;
end;
Dir ist bewusst, dass das 'Disconnect' nach dem 'raise
Exception..' nie zur Ausführung kommt?
Versuche mal ein Tausch.
(Ungetestet, nur so gelesen...)