Uso do timer

Delphi

22/04/2004

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

Curtidas 0

Respostas

Salvati

Salvati

22/04/2004

Ai gente ninguém pode me ajudar??


GOSTEI 0
Motta

Motta

22/04/2004

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;


GOSTEI 0
POSTAR