fazer o tbutton ter double click
03/07/2008
0
pessoal boa tarde alguém de vcs sabem por um tbutton
com a propriedade dblclick tipow estou criando um botão
dinamico que vc pode mexer na tela mais queria que quando
clicasse uma vez não executasse o onclick para mim poder
mexer ele só executasse o on click quando clicasse duas vezes
igual o win entenderão
abraço galera espero uma resposta
tcháu
com a propriedade dblclick tipow estou criando um botão
dinamico que vc pode mexer na tela mais queria que quando
clicasse uma vez não executasse o onclick para mim poder
mexer ele só executasse o on click quando clicasse duas vezes
igual o win entenderão
abraço galera espero uma resposta
tcháu
Angelmorbit
Curtir tópico
+ 0
Responder
Posts
03/07/2008
Marco Salles
pessoal boa tarde alguém de vcs sabem por um tbutton
com a propriedade dblclick tipow estou criando um botão
dinamico que vc pode mexer na tela mais queria que quando
clicasse uma vez não executasse o onclick para mim poder
mexer ele só executasse o on click quando clicasse duas vezes
igual o win[u:e764e63e70][b:e764e63e70] entenderão [/b:e764e63e70][/u:e764e63e70]
abraço galera espero uma resposta
tcháu
hummmmm ... ´dexa vê´
na seccção Private do Form defina a procedure:
procedure MeuButtonDbClick(Sender: TObject);
Escreva
procedure TForm1.MeuButtonDbClick(Sender: TObject); begin showmessage(´So para testar mesmo ...); end;
no evento OnCreate :
procedure TForm1.FormCreate(Sender: TObject); begin button1.ControlStyle := button1.ControlStyle + [csClickEvents]; TForm(button1).OnDblClick:= MeuButtonDbClick; end;
espero ter sido util . Boa Sorte..
Responder
Clique aqui para fazer login e interagir na Comunidade :)