Code: Detail

Delphi - (Portuguese)

Download de arquivos da internet

Rotina para baixar arquivos de um site ou de um lugar qualquer da rede.

Last update: 11/12/2013
Delphi       
 
N/A
N/A
N/A
N/A
 

function DownloadFile(Source, Dest: string): Boolean; 
begin 
  try 
    Result:= UrlDownloadToFile(nil, PChar(source),PChar(Dest), 0, nil) = 0; 
  except 
    Result:= False; 
  end; 
end;


/*UTILIZANDO*/
if DownloadFile ('http://www.SITE.com/arq.htm','c:\arq.htm') then 
  ShowMessage('Download Concluído.');

Source: http://www.activedelphi.com.br/forum/viewtopic.php?t=47655&postdays=0&postorder=asc&start=30&sid=527
 
Users who have marked this routine as a favorite
 
 
 
The site ti4fun is not responsible for the content on sites for which you have external links

Articles, routines, tips, forums, blogs or any other content posted on ti4fun site is not tested and not validated, so you should test and validate any information collected on the ti4fun site before applying it to final use environment, such as example, production. the TI4FUN site is not responsible for quality or for any damages, direct, indirect or consequential, from use of any content posted by the authors in the site.

All content published on the ti4fun site is the responsibility of the author and do not necessarily express the views of the site ti4fun and its employees.