| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
carbox Colaborador

Registrado: Quarta-Feira, 3 de Março de 2010 Mensagens: 1471
|
Enviada: Sex Ago 13, 2010 8:37 am Assunto: Alguem já fez? |
|
|
Pessoal?
Gostaria de saber se alguem tem alguma ideia de como fazer um label ou Panel ficar piscando quando a soma de um campo for maior que zero.
Deu brancoo |
|
| Voltar ao Topo |
|
 |
nacht21 Experiente

Registrado: Segunda-Feira, 5 de Julho de 2010 Mensagens: 481
|
Enviada: Sex Ago 13, 2010 8:49 am Assunto: |
|
|
| Eu nunca fiz mas pela lógica não é difícil. Acredito que na parte da label piscar vc deva criar um componente, agiliza bastante o processo. |
|
| Voltar ao Topo |
|
 |
carbox Colaborador

Registrado: Quarta-Feira, 3 de Março de 2010 Mensagens: 1471
|
Enviada: Sex Ago 13, 2010 8:59 am Assunto: |
|
|
| nacht21 escreveu: | | Eu nunca fiz mas pela lógica não é difícil. Acredito que na parte da label piscar vc deva criar um componente, agiliza bastante o processo. |
Queria algo mais ou menos assim.... Quanto um determinado produto estiver zerado no estoque tenho uma procedure que joga ele numa consulta onde lista todos os produtos que estao com saldo zero.
o que preciso é de um label ou algum componente que fique piscando quando houverem itens zerados.
vi fazer isso com uma label num exemplo que baixei a muito tempo na net, mas não estou mais encontrando. |
|
| Voltar ao Topo |
|
 |
samfreire Aprendiz

Registrado: Quinta-Feira, 11 de Março de 2010 Mensagens: 136
|
Enviada: Sex Ago 13, 2010 9:02 am Assunto: |
|
|
para piscar consigo fazer assim:
de dois click no ttime e coloca interval 50
| Código: | if Label1.visible = false then
begin
Label1.visible := true;
end else begin
Label1.visible := false; |
e para disparar o Time
| Código: | | Timer1.OnTimer (Self); |
|
|
| Voltar ao Topo |
|
 |
BrunoMoreyra Colaborador

Registrado: Quinta-Feira, 26 de Novembro de 2009 Mensagens: 1398 Localização: Goiânia - GO / Brasília - DF
|
Enviada: Sex Ago 13, 2010 9:52 am Assunto: |
|
|
bom dia,
você pode utilizar o componente TTimer, coloca um intervalo acho que é em milisegundos, e quando quiser que começe a executar o Timer de acordo com o tempo estipulado, é setar a propriedade Enabled com o valor igual a True (Verdadeiro), e quando quiser parar, é setar a propriedade com o valor igual a False (Falso).
Código do timer.
| Código: |
Label1.visible := not Label1.visible;
|
| samfreire escreveu: | para piscar consigo fazer assim:
de dois click no ttime e coloca interval 50
| Código: | if Label1.visible = false then
begin
Label1.visible := true;
end else begin
Label1.visible := false; |
e para disparar o Time
| Código: | | Timer1.OnTimer (Self); |
|
_________________ Atencisamente,
Bruno Moreira Batista.
http://www.kawek.com.br/BrunoBatista
Skype: Bruno_Batysta |
|
| Voltar ao Topo |
|
 |
carbox Colaborador

Registrado: Quarta-Feira, 3 de Março de 2010 Mensagens: 1471
|
Enviada: Sex Ago 13, 2010 10:01 am Assunto: |
|
|
Valeu pessoal...
Já deu pra dar uma luz...
Depois Posto o resultado aqui... |
|
| Voltar ao Topo |
|
 |
|