[Lazarus] TShiftState "lock" states in mousewheel events

Alexander Klenin klenin at gmail.com
Mon Oct 3 18:05:55 CEST 2011

2011/10/4 Flávio Etrusco <flavio.etrusco at gmail.com>:
>>>> Delphi does not have these elements, and, since they are usually not working anyway,
> This is easily fixable ;-) But until now I didn't realize this breaks
> code written for Delphi that checked for empty set or superset. I take
> back my argument for handling them in other messages then. The LCL
> implements GetKeyState anyway (although I'd prefer it was "pascalized"
> to avoid bitmasks...)

Of course. There should be a way to check key locks state,
TShiftState is just not a good place for this.

Alexander S. Klenin

More information about the Lazarus mailing list