Dois Eventos em UM

Delphi

03/11/2010

Como faço para que um Button que já tem um Evento Click execute outro Click antes do seu próprio Click, isso em tempo de execução, sendo que, Tudo isso esta dentro de um Template, ou seja, não posso simplesmente adicionar o Evento em tempo de desenvolvimento, um Evento tem que ser incorporado ao outro em tempo de execução.
Robson Meneses.

Robson Meneses.

Curtidas 0

Respostas

Eduardo Marcolongo

Eduardo Marcolongo

03/11/2010

Não entendi muito bem, mas se vc quiser chamar um click de outro botão faça assim:

dentro do button2, no onclick:

button1.onclick(nil);


ou se preferir pegue o que esta no button1, crie uma procedure e chame nos dois. 
GOSTEI 0
Robson Meneses.

Robson Meneses.

03/11/2010

Obrigado Eduardo,

Mas a questão é:

Em tempo de execução, incorporar dois métodos em um !... ou seja ao clicar no Botão2 automaticamente ele executaria o click do botão1, teria de executar dois métodos juntos. Mas porém isso poderia acontecer ou não, mediante a alguns parâmetros, ou seja, poderá executar desta forma ou apenas o click do Boão2 sem o click do botão1. Teria de passar por uma decisão :

Exemplo:

       if ( a > b ) then
       begin
          Botao2.Onclick := Botao2.Onclick + Botao1.Onclick;
       end
       else
       begin
          Botao2.Onclick := Botao2.Onclick;
       end;

Detalhe, eu não posso alterar o método do Objeto no Desenvolvimento, tudo tem que ser feito na Execução do projeto.

É isso ai !


At.Robson
GOSTEI 0
POSTAR