F�rum Downlopad arquivo usando TIdHTTP #386426

15/09/2010

Ol� pessoal,
estou tentando fazer um procedimento para download de arquivos usando TIdHTTP.

  Http := TIdHTTP.Create(nil);
  Http.OnWork:= HttpWork;
  Http.OnWorkBegin := HttpWorkBegin;
  Http.OnWorkEnd := HttpWorkEnd;

  MS := TMemoryStream.Create;

Para fazer o download fa�o assim:

  Http.Request.CacheControl := 'no-cache';
  Http.Get(URL_DO_AQRUIVO, MS);
  MS.SaveToFile('c:\agenda.zip');

No evento Http.OnWork tenho um progressbar e posso observar que o download � iniciado. Por�m o m�todo MS.SaveToFile n�o ocorre, ou seja, nunca tenho o arquivo salvo em disco.

Onde estou errando?

Uso Delphi7 e Indy (10.0.76)

Carlos Phelippe

Curtir t�pico

+ 0

Responder

Post mais votado

16/09/2010

Pessoal, resolvi com essa dica:

http://delphiforyou.blogspot.com/2010/03/download-de-arquivos-com-idhttp.html

Carlos Phelippe

Responder

Gostei + 1