DownLoad com progresso

Delphi

26/06/2004

Oi Pessoal,

Eu uso a função para fazer download de arquivos pela internet.

rlDownloadToFile(nil, PChar(´http://paginateste/arquivo1.txt´),
PChar(´arquivo1.txt´), 0, nil);

Alguém sabe como fazer aparecer uma barra de progresso do DownLoad ???


Denis

Denis

Curtidas 0

Respostas

Denis

Denis

26/06/2004

up


GOSTEI 0
Cabelo

Cabelo

26/06/2004

Se vc criar um form e colocar no evento on click do botão que vc está chamando para fazer o download, chamar este form, nele vc antes de chamar esta função, define o tamanho do arquivo que será feito o download, e leia a taxa de transferência, coloque um progressbar, um timer neste mesmo form, configure as opções do prgressbar e do timer.

Assim acredito que funciona, além do mais, vc pode colocar outros componentes com os dados de transferência, assim como tem no windows..

sem mais

Cabelo


GOSTEI 0
POSTAR