Refrescar el UrlDownloadToFile????

[petete2008]

solucionado!!!

function DownloadToFile(URL, FileName: String): Boolean;
var lpszFile: Array [0..MAX_PATH] of Char;
begin
// Download to cache by getting newest version
if (URLDownloadToCacheFile(nil, PChar(URL), @lpszFile, MAX_PATH, BINDF_GETNEWESTVERSION, nil) = S_OK) then
// Copy to desired file name
result:=CopyFile(@lpszFile, PChar(FileName), False)
else
// Failed
result:=False;
end;

[petete2008]

Ahora solo me falta ponerle un progressbar

Alguien sabe como hacerlo?
Gracias

[Casimiro Noteví]

Amigo, tienes casi 100 mensajes... recuerda nuestra guía de estilo, gracias.