Foros Club Delphi - Capturar El Evento Onmousemove

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)

- - Capturar El Evento Onmousemove (https://www.clubdelphi.com/foros/showthread.php?t=3711)

ANTONIOGALISTEO

17-09-2003 17:56:44

Capturar El Evento Onmousemove

Hola.

Tengo un problema, he creado un componente de tipo TForm, en el cual quiero capturar, el evento OnMouseMove, hasta aqui todo bien.

El problema surge, cuando en el formulario existen mas componentes, como es habitual, y al pasar el raton, sobre estos el evento no me salta.

Es decir, quiero capturar desde un evento, cualquier movimiento del raton, en la ficha.

Un saludo, y gracias.

jachguate

17-09-2003 19:07:46

Podes asociar el método FormMouseMove a los eventos OnMouseMove de todos los controles. Eso si, las coordenadas x,y iran en relación al control donde se mueve el mouse y no al formulario, pero es facil convertir las coordenadas con la formula

Código:

if Sender <> Self Then

Begin

  Coordx := x + (Sender as TControl).Left;

  CoordY := y + (Sender as TControl).Top;

End

Else Begin

  CoordX := x;

  CoordY := y;

End;

Hasta luego.

;)

roman

17-09-2003 19:20:43

Otra forma es colocar una componente ApplicationEvents (en la palete "Aditional") y utilizar su evento OnMessage:

Código:

if Msg.message = WM_MOUSEMOVE then

begin

  { Haz lo que tengas que hacer }

end;



// Permitir que los controles procesen

// el mensaje normalmente

Handled := false;

A diferencia de OnMouseMove del formulario, este evento se lanza incluso si el cursor del ratón pasa sobre controles.

// Saludos

ANTONIOGALISTEO

18-09-2003 09:10:59

jachguate gracias por tu respuesta.

Pero lo que necesito es desde un solo evento, poder captura el movimiento del raton, cuando pase sobre cualiquier componente de ficha.

Esto es devido, a que la captura del raton, la tengo en un componente propio, que hereda del TForm.

Un saludo

ANTONIOGALISTEO

18-09-2003 09:16:01

roman gracia por responder.

El metodo que tu me dices, es el que tengo implementado, pero tengo el problema, que el evento salta solo, si realizar un movimiento del raton, siempre que el puntero se encuente sobre el form.

Por esto, busca una alternativa, donde pueda resivir la posicion X e Y, del raton, comparando estas con la posición anterior.

Un saludo.

La franja horaria es GMT +2. Ahora son las 02:30:10.