Baixando um arquivo da internet com o Delphi

Neste artigo você aprenderá a baixar um arquivo com o seu programa feito em Delphi.

Por | @gabrielbiga Programação
Este simples artigo te ensinará a baixar um arquivo da internet com seu programa feito em Delphi. Este procedimento é muito útil para quem quer sempre atualizar seu programa criado em Delphi, enfim, personalize para o que você quiser!

Com o Delphi já aberto, entre na sua janela de código.
Baixando um arquivo da internet com o Delphi

No grupo USES insira: Urlmon.
Depois insira a Function:

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


Tudo ficará assim:
Baixando um arquivo da internet com o Delphi

Utilização:

Em um Button ou em qualquer outro componente você poderá utilizar assim:

if DownloadFile ('http://www.onde.com/index.htm','c:aonde_vc_quer_q_fique.htm') then
Begin
ShowMessage('Download Concluído.');
End;


Se você tiver alguma dúvida me envie um email no target="_blank">gabrielbiga@gmail.com.
Ou um comentário aqui em baixo.

Até a proxíma.

Mais sobre:
Share Tweet
Recomendado
Comentários
Carregar comentários
Destaquesver tudo