Bom dia. para conseguir isto voce pode escrever metodos que 'escutam' as mensagens do windows, CM_MOUSEENTER, CM_MOUSELEAVE
Voce pode ver uma amostra destas mensagens em TControl Pequeno exemplo, cole este fonte na unit de um form, que contenha um label pelo menos... TLabel = class(StdCtrls.TLabel) private public procedure CMMouseEnter(var Message: TMessage); message CM_MOUSEENTER; procedure CMMouseLeave(var Message: TMessage); message CM_MOUSELEAVE; end; procedure TLabel.CMMouseEnter(var Message: TMessage); begin inherited; Self.Font.Color := clBlue; end; procedure TLabel.CMMouseLeave(var Message: TMessage); begin inherited; Self.Font.Color := clBlack; end; Atenc; Elazar Dornelles Ceza ________________________________ De: Jhosef Marks <jho...@gmail.com> Para: lista-del...@yahoogrupos.com.br; delphi-br@yahoogrupos.com.br Enviadas: Terça-feira, 14 de Abril de 2009 9:48:54 Assunto: [delphi-br] Criação de Componentes + Eventos Dinamicos Bom dia, Estou fazendo um componente (adicinando uma propriedade) descendente de TLabel, que tem a propriedade link onde o programador pode colocar um link ( www.google.com) e se essa propriedade tiver um valor, então quando o usuário colocar o mouse em cima (onMouseEnter) desse label, quero que fique sublinhado e azul e quando tire o mouse de cima (onMouseLeave) quero que volte ao normal, até ai tudo beleza, sem nenhum problema. Agora o que eu quero é que quando usar esse componente q eu possa inserir um código no evendo onMouseLeave desse componente e quando o sistema estiver sendo executado seja executado o que eu coloquei como padrão no componente e o que o programador programou no componente em designer time. Como eu preparo meu componente para isso? JM -- ____________ _________ _________ _________ __ Jhosef Marks de Carvalho Delphi Developer http://groups. google.com/ group/soumaisdel phi ############ ######### ######### ######### ######### ######### ######### ### CAMPANHA POR UMA INTERNET SEGURA Proteja o endereço de seus amigos como estou protegendo o seu. Ao enviar mensagens use SEMPRE o "Cco" (cópia oculta). Assim TODOS os endereços estarão preservados. E, claro, antes de encaminhar um e-mail, delete todas as informações que apareçam no corpo do e-mail e que possam ser usadas por hackers. ############ ######### ######### ######### ######### ######### ######### ### Sent from Joinville, SC, Brazil [As partes desta mensagem que não continham texto foram removidas] Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]