pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

SpkToolbar: Prevent mouse clicks on hidden "More options" button.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7700 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2020-09-26 22:37:56 +00:00
parent 51e360c94b
commit eeda26f714
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/spktoolbar/SpkToolbar/spkt_Pane.pas
View File

@ -892,7 +892,7 @@ procedure TSpkPane.MouseDown(Button: TMouseButton; Shift: TShiftState;
X, Y: Integer);
begin
// Handle mouse down on 'More options' button
if FInMoreOptionsButton then
if FInMoreOptionsButton and FShowMoreOptionsButton then
begin
FMoreOptionsButtonState := mobsBtnPressed;
// Draw the 'More options' button