Ok scusa
l'errore lo ottengo qui
codice:
function DoDownload(vURL, vLocation : String): Boolean;
begin
  with TDownloadURL.Create(nil) do
  try
    URL:= vURL;
    FileName := vLocation;
    OnDownloadProgress := Form1.URL_OnDownloadProgress;
 -->  ExecuteTarget(nil) ; 
  finally
    Free;
  end;
end;