EDIT ficar piscando

Delphi

14/08/2003

Tenho um edit e gostaria q ele ficasse piscando na tela... como faco ??
agradeco
Eduardo


Deusem

Deusem

Curtidas 0

Respostas

Pardal2003

Pardal2003

14/08/2003

Olá amigo,

Bem, minha idéia seria primeiramente criar uma variavel global (Hide: Boolean) e colocar um component Timer no form. No evento OnTime dele, coloque:

Hide:= not Hide;
If Hide Then Edit1.Font.Color:=clWhite // mesma cor que a do fundo do campo Edit
Else Edit1.Font.Color:=clBlack;

Desse jeito funciona. Só não sei se é a melhor maneira de se fazer isso.

Espero ter ajudado.

[]´s

Pardal2003


GOSTEI 0
Deusem

Deusem

14/08/2003

coloquei isso no ontimer...

if edit2.Font.Color = clyellow then
edit2.Font.Color:=clred
else
edit2.font.Color:=clyellow;


e deu certo

agradeco muito
edu


GOSTEI 0
POSTAR