[Lazarus] Scroll Wheel

[Timothy Groves]

No; I am unsure as to how to do that. Would I need to create a descendant
class, or does Lazarus support overriding without doing so?

"Chess is an exciting game, when played with shotguns."  --MegaHAL
On Apr 11, 2014 1:59 PM, "Mattias Gaertner" <nc-gaertnma at netcologne.de>
wrote:

> On Fri, 11 Apr 2014 13:45:41 -0400
> Timothy Groves <the.tail.kinker at gmail.com> wrote:
>
> > I have several TEdit objects in my form, and because they handle only
> > integer data, I'd like to use my scroll wheel to edit their values.
> > However, there is no OnScrollWheel event that I can see.
> >
> > Since scroll wheels are passed as mouse clicks, I thought to examine the
> > OnMouseDown/OnMouseUp events, but nothing is passed to indicate /which/
> > button is being pressed.
> >
> > So either Google has failed me, or I have failed Google, but either way,
> > I can't find the answer on the net after an hour of searching. Can
> > anyone point me in the right direction?
>
> Have you tried to override
>     procedure WMMouseWheel(var Message: TLMMouseEvent); message
> LM_MOUSEWHEEL;
> ?
>
> Mattias
>
> --
> _______________________________________________
> Lazarus mailing list
> Lazarus at lists.lazarus.freepascal.org
> http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20140411/75d5f3d2/attachment-0003.html>