[delphi-br] Me expliquem o porque por favor.

2009-03-31 Por tôpico Roberto
Tenho num form um botão e um label (visible =false)

 

Ao clicar no botão na primeira vez, o label apaga e depois do tempo
decorrido sleep acende normalmente.

Porque ao clicar nas vezes seguinte não apaga e acende depois do tempo, fica
sempre aceso?

Já resolvi o assunto, mudando o foco para outro componente e depois
retornando ao clicar, ainda assim  não entendo porque acende e não apaga
mais. 

 

procedure TForm1.Button1Click(Sender: TObject);

begin

   Label1.Visible := false;  // esta não acontece na segunda vez em diante

sleep(5000);

   Label1.Visible := true;

  end;

 

Roberto(RJ)

 

 

Em tempo, mesmo com tempos maiores, continua o problema



[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Me expliquem o porque por favor.

2009-03-31 Por tôpico André
Será que o Application.messages antes do sleep resolve?

 

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Roberto
Enviada em: terça-feira, 31 de março de 2009 Boa tarde Dé 15:26
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Me expliquem o porque por favor.

 

Tenho num form um botão e um label (visible =false)

Ao clicar no botão na primeira vez, o label apaga e depois do tempo
decorrido sleep acende normalmente.

Porque ao clicar nas vezes seguinte não apaga e acende depois do tempo, fica
sempre aceso?

Já resolvi o assunto, mudando o foco para outro componente e depois
retornando ao clicar, ainda assim não entendo porque acende e não apaga
mais. 

procedure TForm1.Button1Click(Sender: TObject);

begin

Label1.Visible := false; // esta não acontece na segunda vez em diante

sleep(5000);

Label1.Visible := true;

end;

Roberto(RJ)

Em tempo, mesmo com tempos maiores, continua o problema



[As partes desta mensagem que não continham texto foram removidas]



RES: [delphi-br] Me expliquem o porque por favor.

2009-03-31 Por tôpico Roberto
Resolvido, já estava, como já declarei. Eu queria é entender o processo.

Eu até tenho uma idéia, mas queria ouvir os colegas.

Roberto

 

De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de André
Enviada em: terça-feira, 31 de março de 2009 15:47
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Me expliquem o porque por favor.

 

Será que o Application.messages antes do sleep resolve?

De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
[mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
] Em
nome de Roberto
Enviada em: terça-feira, 31 de março de 2009 Boa tarde Dé 15:26
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br 
Assunto: [delphi-br] Me expliquem o porque por favor.

Tenho num form um botão e um label (visible =false)

Ao clicar no botão na primeira vez, o label apaga e depois do tempo
decorrido sleep acende normalmente.

Porque ao clicar nas vezes seguinte não apaga e acende depois do tempo, fica
sempre aceso?

Já resolvi o assunto, mudando o foco para outro componente e depois
retornando ao clicar, ainda assim não entendo porque acende e não apaga
mais. 

procedure TForm1.Button1Click(Sender: TObject);

begin

Label1.Visible := false; // esta não acontece na segunda vez em diante

sleep(5000);

Label1.Visible := true;

end;

Roberto(RJ)

Em tempo, mesmo com tempos maiores, continua o problema

[As partes desta mensagem que não continham texto foram removidas]





[As partes desta mensagem que não continham texto foram removidas]