Cara, você explica muito mal seus problemas.
Mas pelo que consegui entender seu botão está num array de ponteiros? É só fazer um cast. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Fabinho Enviada em: quinta-feira, 20 de setembro de 2007 09:46 Para: delphi-br@yahoogrupos.com.br Assunto: Res: [delphi-br] componentes criados dinamicamente Obrigado pela atenção, Ricardo. Mas o problema é que esse meu TButton é criado um array dinâmico. Suponho que eu preciso de um desses três: Criar uma classe para tratar o evento; Criar um type para tratar o evento; Criar uma procedure of object para tratar o evento; E agora? ----- Mensagem original ---- De: Ricardo César Cardoso <[EMAIL PROTECTED] <mailto:ricardo_engsoft%40yahoo.com.br> > Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> Enviadas: Quinta-feira, 20 de Setembro de 2007 9:37:44 Assunto: Re: [delphi-br] componentes criados dinamicamente Tá na mão: /*********** ********* ****/ procedure TForm1.FormMouseDow n(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); var b:tbutton; begin b:=Tbutton.create( self); b.visible:=false; b.parent:=self; b.left:=x; b.top:=y; b.name:='Btn' +inttostr( contador) ; b.Caption:=' Clique-me' ; inc(contador) ; b.visible:=true; b.onclick:=clicou; // <= aqui está o que vc precisa. É só descrever o procedimento na procedure "Clicou" end; procedure TForm1.clicou( sender: TObject); begin ShowMessage( 'Clicou!! !'); end; /*********** ********* ***/ Fabinho <gatascheguei@ yahoo.com. br> escreveu: Senhores, criei um componente dinamicamente, mas não consigo associar um evento a ele. Por exemplo, se eu criar um TButton, quero criar um evento Onclick pra ele. Como faço? Flickr agora em português. Você clica, todo mundo vê. http://www.flickr. com.br/ [As partes desta mensagem que não continham texto foram removidas] _ Flickr agora em português. Você clica, todo mundo vê. Saiba mais. [As partes desta mensagem que não continham texto foram removidas] Flickr agora em português. Você clica, todo mundo vê. http://www.flickr.com.br/ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
