[Lazarus] TMouseButton

[Paul Ishenin]

07.04.2010 21:46, Kjow wrote:
> I saw that in TMouseButton (row 142 of Controls unit) there isn't
> mbNone, so I simply edited that row:
>
> TMouseButton = (mbNone, mbLeft, mbRight, mbMiddle, mbExtra1, mbExtra2);
>
> Now I can see when no buttons are pressed; I simply manage it with
>    
You miss that it is possible to press 2 buttons at the moment. That's 
why LCL uses a set to define what is pressed and what is not.

As result you don't need mbNone. Just use [] to indicate that no button 
is pressed.

Best regards,
Paul Ishenin.