Fórum Associar evento a bjeto criado dinamicamente #259150

19/11/2004

0

Pessoal,

Tô com um probleminha aqui e espero que alguem possa me ajudar:

Estou criando um projeto que instancia dinamicamente várias DLL´s e, para cada uma delas eu crio um ítem de menú dinamicamente.
Agora eu preciso que, ao clicar no menu, o programa chame a dll correspondente.

O problema é o seguinte:
Como eu programo o evento Click de um objeto (TMenuItem) que eu criei dinamicamente?

Espero que possam me ajudar,


Carlosfim

Carlosfim

Responder

Posts

19/11/2004

Jc_analista

bom pode ser feito assim:

qdo vc criar o menu coloque isso:
 MainMenu1.Items[1].OnClick := CapturaClick;

Depois crie a procedure:
procedure CapturaClick(Sender : TObject);
 

procedure Tform1.CapturaClick(Sender: TObject);
begin
// aqui dentro vc faz o tratamento do clik  
 if TMenuItem(Sender).Caption=´teste´ then //vc pode usar tag,name ao inves do caption
   .
   .  
   .
end;




Espero ter ajudado.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar