1

Olá, criei uma aplicação no Delphi, mas ela precisa fazer download de alguns arquivos que eu tenho em um site, mas não tenho ideia de como fazer isto, me ajude por favor. Dez de já agradeço por ter lido minha pergunta!

0

1 Resposta 1

1

Você pode usar a função URLDownloadToFile:

// Inclua em "Uses" a unit "Urlmon"
function BaixarArquivo(const URL, SalvarComo: string): Boolean;
var
  H: HRESULT;
begin
  H := URLDownloadToFile(nil, pchar(URL),
                              pchar(SalvarComo),
                              0,
                              nil);
  Result := H = S_OK;
end;

Exemplo de utilização:

if BaixarArquivo('http://www.fooBAR.com/baz.poo', 'C:\baz.poo') then
  ShowMessage('Arquivo baixado com sucesso!')
else
  ShowMessage('Falha ao baixar arquivo.');

Há também como fazer isto com o componente TIdHTTP com o método Get.

1
  • 1
    Obrigado amigo! Por aqui deu certo! Commented 6/06/2015 às 19:25

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .