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]);