[Lazarus] TShiftState "lock" states in mousewheel events

[Alexander Klenin]

2011/10/4 Flávio Etrusco <flavio.etrusco at gmail.com>:
>> However under Win32 KeyDown/Up and MoudeUp/Down/Move events do not
>> recieve these elements, while MouseWheel events do.
>
> See http://bugs.freepascal.org/view.php?id=20065.
> Also there are duplicate functions in Forms and Controls units (apart
> form the function which handles the WMWheel in win32), which should be
> de-duplicated.
> IMO the function should be/stay implemente in Controls and enhanced
> (i.e. move the win32 function to Controls).

Do I understand correctly that after this patch ssNum/ssCaps/ssScroll will
not be included in the Shift argument of DoMouseWheel?
If so, +1 from me.

>> Delphi does not have these elements, and, since they are usually not
>> working anyway,
>> I suggest to remove them.
>
> They are declared in FPC, so I think this is not an easy call.
I see. Let them be then, they are harmless if never set ;-)

-- 
Alexander S. Klenin