URLDownloadtoFile abbrechen?

[Tillmet]

Hmm, vom Sinn her verstehe ich es, müsste so auch gehen, aber es will nicht so ganz. Ich nutze diese IBind funktion übrigens, hatte ich nur vergessen zu schreiben. Ich habe das ganze in einer Unit ausgelagert, aber daran sollte es ja nicht liegen, oder?


Meine Codestelle:

Delphi-Quellcode:

function cDownloadStatusCallback.OnProgress(ulProgress, ulProgressMax, ulStatusCode: ULONG; szStatusText: LPCWSTR): HResult;
begin
  case ulStatusCode of
    BINDSTATUS_FINDINGRESOURCE:
    begin
      InternetUpdater.Label1.Caption := 'Datei wurde gefunden...';

    end;



    BINDSTATUS_CONNECTING:
    begin
      InternetUpdater.Label1.Caption := 'Es wird verbunden...';

    end;
    BINDSTATUS_BEGINDOWNLOADDATA:
    begin 
      InternetUpdater.Gauge1.Progress := 0;
      InternetUpdater.Label1.Caption := 'Der Download wurde gestartet...';

    end;



    BINDSTATUS_DOWNLOADINGDATA:
    begin
    if FCancelDownLoad then // Download abgebrochen?
    Result := E_ABORT;

      InternetUpdater.Gauge1.Progress := MulDiv(ulProgress,100,ulProgressMax);
      InternetUpdater.Label1.Caption := 'Datei wird heruntergeladen...';

    end;
    BINDSTATUS_ENDDOWNLOADDATA:
    begin
      InternetUpdater.Label1.Caption := '';
    end;
  end;
  Application.ProcessMessages;

  Result := S_OK;
end;

Edit: Ich glaube, ich habs gleich, warte mal mit der Auflösung ^^


Edit2: Jop, habe es gelöst, vielen Dank, jetzt ist das Programm fertig ^^ DANKE