Fórum Uso do timer #227470

22/04/2004

0

E ai pessoal blz???

Olha tô precisando fazer um for e paar ler cada pasta e exibir as imagens contidas nelas, com um determinado tempo preciso que elas mudem, ma nuam posso colocar na procedure TForm1.Timer1Timer(Sender: TObject); , mas numa outra procedure, minha pergunte é, como manipulo o componente timer, manipulando o tempo, fora da procedure do evento timer???
o código tá é mais ou menos assim

procedure TForm1.imagem(caminho:TStrings);
begin
for i:= 0 to (ListBox1.Count-1) do
timer1.Interval:= 250;
Image1.Picture.LoadFromFile(´C:\teste\´+caminho+´\Imagem´+FormatFloat(´0 00´,contImg)+´.bmp´);
Inc(contImg);
if contImg=4 then
contImg:=1;
end;


Salvati

Salvati

Responder

Posts

22/04/2004

Salvati

Ai gente ninguém pode me ajudar??


Responder

Gostei + 0

22/04/2004

Motta

nao me parece ser questao de ttimes um sleep(); resiolve


sleep();

procedure TForm1.imagem(caminho:TStrings);
begin
for i:= 0 to (ListBox1.Count-1) do
sleep(1000); --1s
Image1.Picture.LoadFromFile(´C:\teste\´+caminho+´\Imagem´+FormatFloat(´0 00´,contImg)+´.bmp´);
Inc(contImg);
if contImg=4 then
contImg:=1;
end;


Responder

Gostei + 0

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

Aceitar