Como fazer download da web para o micro

Delphi

13/03/2004

gostaria de saber como fazer download de arquivos hospedados na web via delphi, já testei o exemplo que está no site do clube, mas não está dando certo.


Infocom

Infocom

Curtidas 0

Respostas

Skaarj

Skaarj

13/03/2004

Tenta essa:

756 - Baixando arquivos da internet
Esta dica serve para quem deseja criar um sistema que atualize seus softwares via internet, e também para quem faz jogos online, ou seja, jogos que exigem a conexão com a internet para serem jogados, pode precisar de um meio rápido, fácil e desburocratizado para baixar arquivos de um site ou de um lugar qualquer da rede. Veja só como é simples e sem contra indicações fazer isso:
function DownloadFile(Source, Dest: string): Boolean;
begin
  try
    Result:= UrlDownloadToFile(nil, PChar(source),PChar(Dest), 0, nil) = 0;
  except
    Result:= False;
  end;
end;

Para usar esta function é preciso declarar Urlmon na seção uses da unit. Depois basta fazer uma chamada padrão:
if DownloadFile (´http://www.onde.com/arq.htm´,´c:\arq.htm´) then
  ShowMessage(´Download Concluído.´);

Dica de: Alexandre de Andrade Gonçalves



GOSTEI 0
POSTAR