----- Mensagem original ---- De: Luciano Calenzani Simões <[EMAIL PROTECTED]> Para: delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 2 de Setembro de 2008 17:18:17 Assunto: Res: [delphi-br] Criando novo componente
No escopo de visibilidade protected coloque: procedure DoClick; override; No implementation, escreva: procedure TEditCustomizado. DoClick; begin inherited; Color := clInfoBk; // Por exemplo, trocando a cor. end; Alguns links: http://imasters. uol.com.br/ artigo/343/ delphi/criando_ componentes_ no_delphi_ -_parte_1/ http://imasters. uol.com.br/ artigo/342/ delphi/criando_ componentes_ no_delphi_ -_parte_2/ http://imasters. uol.com.br/ artigo/341/ delphi/criando_ componentes_ no_delphi_ -_final/ Luciano Calenzani Simões ----- Fim da mensagem original ---- Só uma dica: deixe a linha inherited antes do código que vc quer adicionar para q ele seja executado DEPOIS do evento que vc codificar no formulário (como no exemplo). Para que o código seja executado antes do código do formulário, deixe o inherited como última linha da rotina. []'s --------------------------------------------------- Att.: Willian Jhonnes L. dos Santos Analista/Desenvolvedor Object/Free Pascal [EMAIL PROTECTED] --------------------------------------------------- Seja livre. Use Linux. Grupo de Usuários GNU/Linux de São José dos Pinhais Linux user number 449753 --------------------------------------------------- Powered by Slackware Linux 12.0 Kernel 2.6.21.5-custom --------------------------------------------------- Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]