TDownloadURL Fehler abfangen?

[Hedge]

Ich benutze TDownloadURL um eine Datei herunterzuladen was auch ziemlich gut funktioniert.

Leider werden Fehler (zB. falsche URL) sofort ausgegeben anstatt eine Exception zu werfen.

Kann ich trotzdem irgendwie die Fehlermeldungen auffangen und selbst damit weiterarbeiten?

Die entsprechende Codestelle in der Unit ExtActns sieht so aus:

Delphi-Quellcode:

  if Assigned(UrlMonDownloadToFile) then
  begin
    if URLMonDownloadToFile(nil, PChar(URL), PChar(FileName), 0, Self as IBindStatusCallBack) <> S_OK then
      raise Exception.CreateResFmt(@SErrorDownloadingURL, [URL]);
  end else
    raise Exception.CreateResFmt(@SUrlMonDllMissing, [UrlMonLib]);