Ver Mensaje Individual
  #3  
Antiguo 02-09-2004
luigidean luigidean is offline
Miembro
 
Registrado: ago 2004
Posts: 22
Reputación: 0
luigidean Va por buen camino
Solucionado

Gracias por la respuesta pero ya encontré la solucion. Yo lo que queria hacer es que al pasar por encima de un boton, este cambiara de color. El problema que habia con OnMouseMove es que si pasas rapidamente el raton por encima del boton el cambio de color no se produce.
Buscando por el foro encontre la respuesta, tenia que utilizar manejadores de mensajes:

procedure CMMouseEnter(var Message: TMessage); message CM_MOUSEENTER;
procedure CMMouseLeave(var Message: TMessage); message CM_MOUSELEAVE;

procedure TMyPannel.CMMouseEnter(var Message: TMessage);
begin
Color := clRed;
end;
procedure TMyPannel.CMMouseLeave(var Message: TMessage);
begin
Color := clBtnFace;
end;

De todas formas gracias por responder y la proxima vez buscare en el foro antes de preguntar

Venga saludos.

PD: ¿Donde podria encontrar informacion detallada y con ejemplos sobre los manejadores de mensajes?
Responder Con Cita