Do jeito que o Joao falou ficaria mais ou menos assim..
For i:=0 to Form1.ControlCount-1 do Begin If Form1.controls[i] is TMeuComponente then TMeuComponente(Form1.Controls[i]).OnEnter := MeuEventoDePintura; End; De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de edersonecris Enviada em: segunda-feira, 31 de dezembro de 2007 16:00 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Verificar eventos de componentes... [EMAIL PROTECTED] <mailto:post%40joaomorais.com.br> escreveu: É mais ou menos isso que eu quero, mas não tenho a mínima idéia de como fazer isso. Poderia me dar uma luz(indicar um site, apostila, forum, etc...)? grato > > Quoting Davi Eduardo Borges Wall <[EMAIL PROTECTED] > <mailto:davi.wall%40mult.com.br> > <mailto:davi.wall%40mult.com.br>>: > > > Forma mais barata e pratica. > > > > Crie um descendente para cada um dos seus componentes e implemente a > > troca de cor. > > > > Depois é só utilizar direto os descendentes! > > Uma forma ainda mais barata é escrever um evento OnCreate em um form > abstrato > (daonde todos herdam) e implementar um for fazendo com que determinados > componentes tenham seu OnEnter e OnExit associados. > > -- > Joao Morais > > > > > > > > > De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> > <mailto:delphi-br%40yahoogrupos.com.br> > > [mailto:delphi-br@yahoogrupos.com.br > > <mailto:delphi-br%40yahoogrupos.com.br> > <mailto:delphi-br%40yahoogrupos.com.br>] Em nome de edersonecris > > Enviada em: segunda-feira, 31 de dezembro de 2007 14:19 > > Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> > <mailto:delphi-br%40yahoogrupos.com.br> > > Assunto: [delphi-br] Verificar eventos de componentes... > > > > > > > > Pessoal bom dia!! > > Eu tenho duas funções que mudam a cor dos componentes, quando esta > > selecionado para edição. Uma função chamada pelo evento onexit e outra > > pelo onenter. Gostaria de saber se tem alguma outra forma de chamar > > minha funções, sem ter que ficar colocando as chamadas dela em todos os > > eventos onexit e onenter de todos os componentes. > > Existe alguma forma de se fazer a leitura de todos os eventos através de > > algum código ou componente? > > Vlw. > > > > -- > > Éderson Cassiano Bologna > > [EMAIL PROTECTED] <mailto:edersoncassiano%40terra.com.br> > > <mailto:edersoncassiano%40terra.com.br> > <mailto:edersoncassiano%40terra.com.br> > > sKYPE: edersoncassiano > > MSN: [EMAIL PROTECTED] <mailto:edersoncassiano%40hotmail.com> > <mailto:edersoncassiano%40hotmail.com> > <mailto:edersoncassiano%40hotmail.com> > > www.microtechshop.com > > > > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > -- > > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > > > Links do Yahoo! Grupos > > > > > > > > -- Éderson Cassiano Bologna [EMAIL PROTECTED] <mailto:edersoncassiano%40terra.com.br> sKYPE: edersoncassiano MSN: [EMAIL PROTECTED] <mailto:edersoncassiano%40hotmail.com> www.microtechshop.com [As partes desta mensagem que não continham texto foram removidas]