GARANTIR DESCONTO

Fórum Download de um arquivo a cada 10 segs. #276754

12/04/2005

0

Caros amigos Delphianos !


Tudo bem com vocês ? Bom, o que estou precisando desta vez é o seguinte, preciso criar uma rotina no Form Principal do meu programa que a cada 10 segundos ele execute uma rotina de download de um arquivo da Internet .

A rotina de Download eu tenho. Eu só preciso saber como fazer pra que a cada 10 segundos ele baixe o arquivo .

Por exemplo ...

begin
[..rotina de contagem do tempo...]
Fazdownloaddoarquivo;
end;

Obrigado amigos !


Tiagojmilam

Tiagojmilam

Responder

Posts

12/04/2005

Vprates

vc não poderia utilizar um timer pra fazer essa contagem do tempo???


Responder

Gostei + 0

12/04/2005

Tiagojmilam

Acontece que sou iniciante e não sei como fazer isso !

Poderia me explicar passo a passo como fazer ?


Obrigado mesmo ! ! !


Responder

Gostei + 0

12/04/2005

Fernando Lempê

Insira um componente timer da paleta system, modifique a propriedade interval para 10000 (por default é 1000 ms = 1 s) no evento ontimer insira sua rotina de download.

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Fazdownloaddoarquivo; 
end;


Espero ter ajudado.

Fernando.


Responder

Gostei + 0

12/04/2005

Emerson Nascimento

só melhorando um pouquinho o que já foi dito:

procedure TForm1.Timer1Timer(Sender: TObject); 
begin 
  Timer1.Enabled := False;
  Fazdownloaddoarquivo; 
  Timer1.Enabled := True;
end;


o timer está sendo desligado antes de baixar o arquivo porque, se esse arquivo levar mais de 10s para ser baixado, o processo ficará ´encavalado´, pois será disparado o download novamente, antes do anterior ser finalizado.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar