[Lazarus] How to handle WM_MOUSEWHEEL?

[Sven Barth]

Am 01.11.2010 22:31, schrieb And3mD:
> Hello
>
> I want to do some mouse scrolling control without focus.
> So I need handle WM_MOUSEWHEEL by myself. This message is not always
> caught by window WndProc.
>
>
> In Delphi simply you can do that in TApplication.OnMessage().
>
> In Lazarus i found only TApplication.OnUserInput but there is only
> message type in parameters (Sender: TObject;Msg: Cardinal).
>
> How should I handle WM_MOUSEWHEEL in Lazarus?

You might want to take a look here: 
http://wiki.freepascal.org/Win32/64_Interface#Processing_non-user_messages_in_your_window

I'm using that approach successfully on Windows Mobile.

Regards,
Sven