Ver Mensaje Individual
  #1  
Antiguo 03-02-2014
NEG1414 NEG1414 is offline
Miembro
 
Registrado: mar 2007
Posts: 177
Reputación: 18
NEG1414 Va por buen camino
Como asignar evento MouseEnter y MouseLeave a componente

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

Última edición por NEG1414 fecha: 03-02-2014 a las 11:52:57.
Responder Con Cita