Array
(
)

Componente TTimer

Tap_pedroso
   - 17 set 2004

Olá pessoal, a minha questão não se se dá para fazer sem o TTimer mas eu preciso do seguinte exemplo:

no evento ontimer do ttimer ele mude o caption de um label de 2 em 2 segundos(serão 2 textos) por exemplo:

label.caption:=´Texto 1´;

conta 2 segundos

label.caption:=´Texto 2´;

exit;//parar o texto


Eduprp
   - 17 set 2004

Colega

Utilize o Sleep

Label1.Caption:= ´Texto 1´;
Sleep(2000);
Label1.Caption:= ´Texto 2´;

A única coisa que o Sleep causa uma pausa na sua aplicação.

Obs. Sleep se encontra na unit Windows. tem que colocá-la na cláusula USES.

Eduardo M. Pereira


Inutaishou
   - 17 set 2004

Desculpe ´cair de pára-quedas´, mas o Sleep´não trava o aplicativo? Tem como fazer sem trava-lo?

[]´s,


Marcelo Saviski
   - 17 set 2004

declare uma variavel fora da procedure do evento

#Código

b: Boolean;


no Timer:

#Código
if b then
Label1.caption := ´Texto1´
else
label1.Caption := ´Texto2´;
b := not b;


e deixe a propriedade Interval em 2000


Paulo_amorim
   - 17 set 2004

Olá

Por que não usar o TTimer?

Label1.Text := ´Texto1´;
tmrTempo.Enabled := True;

No Timer vc coloca o Label2 pra receber e atribui Enabled := False..

Espero que ajude
Até+