Buenas... He creado un componente apartir de la Clase TCustomControl
Código:
class PACKAGE TMiComponente : public TCustomControl
Necesito que TMiComponente contenga los eventos OnMouseMove, OnMouseUp, MouseEnter y MouseLeave...
Con los dos primeros no he tenido problemas, los hereda de TCustomControl y con declararlos de la forma:
Código:
__published:
__property OnMouseMove;
__property OnMouseUp;
puedo acceder ha ellos
Situacion diferente afecta a MouseEnter y MouseLeave que supongo no son eventos de TCustomControl .
Creo que tengo que capturar los mensajes MouseEnter y MouseLeave
Código:
//Mesaje entrar raton en componente
void __fastcall CMMouseEnter (TMessage Message);
//Mesaje salir raton del componente
void __fastcall CMMouseLeave (TMessage Message);
BEGIN_MESSAGE_MAP
VCL_MESSAGE_HANDLER(CM_MOUSEENTER, TMessage, CMMouseEnter);
VCL_MESSAGE_HANDLER(CM_MOUSELEAVE, TMessage, CMMouseLeave);
END_MESSAGE_MAP (TCustomControl);
void __fastcall TMiComponente::CMMouseEnter(TMessage Message)
{
.....................
}
void __fastcall TMiComponente::CMMouseLeave(TMessage Message)
{
.....................
}
Hasta aqui correcto dentro del propio componente detecto la entrada y salida del raton... el problema es que no se como hacer para que al igual que los componentes OnMouseMove, OnMouseUp formen parte de los eventos del componente y pueda acceder a ellos "externamente"
en fase de diseño cuando forman parte de otros componentes..
Alguna idea... Gracias
Nota: HE intentado borrar el mensaje anterior enviado por error pero no doy LO SIENTO