Capturar 'ruedita' del ratón

[Jose_Pérez]

Hola:

Algunos ratones disponen de una pequeña rueda, muy útil para realizar desplazamientos en algunos componentes. ¿Cuál es el mensaje de la API que controla este evento?.

Saludos y gracias.

[delphi.com.ar]

Podés usar el mensaje WM_MOUSEWHEEL...
TMyWinControl = class(TWinControl)
private
procedure WMMouseWheel(var Message: TWMMouseWheel); message WM_MOUSEWHEEL;
end;


O los evento que estan protegidos de los TWinContors: OnMouseWheel, OnMouseWheelDown, OnMouseWheelUp...

TMyWinControl = class(TWinControl)
published
property OnMouseWheel;
property OnMouseWheelDown;
property OnMouseWheelUp;
end;


Algunas clases ya los tienen publicado

[Jose_Pérez]

OK., gracias.

[metalfox6383]

Eso detecta si la ruedita ha sido girada, pero ¿cómo hace para saber si fue acia adelante o atrás?

[dec]

Hola,


(...) ¿cómo hace para saber si fue acia adelante o atrás?


Pues digo yo que "OnMouseWheelDown" indica que la ruedita se movió para abajo y "OnMouseWheelUp" lo contrario, o sea, que se movió para arriba. ¿No?

[Toni-2006]

Hola a todos. Simplemente soy un aficcionado a la programación en Delphi que, aunque estoy registrado desde el 2006, nunca he hecho uso de este foro, y ahora mismo si que necesito un poco de ayuda.

¿Que Uses debo poner para que al compilar no me de error en "WM_MOUSEWHEEL"?

Muchas Gracias.

[juanlaplata]

uses Messages;