Esa instrucción tambien esta escrita en el proyecto:
Código Delphi
[-]
function DownloadURLToFile(const AUrl, AFileName: TFileName): boolean;
begin
Result := True;
with TDownLoadURL.Create(nil) do
try
URL := AUrl;
Filename := AFileName;
try
ExecuteTarget(Nil);
except
Result := False;
end;
finally
Free;
end;
end;
Utiliza un TDownLoadURL que es un "Standard Action"
que implementa "URLDownloadToFile" de UrlMon.dll.... A la larga lo mismo
pero Made in Borland