From eeda26f7145121fb92d3345623df4b86cd503ccb Mon Sep 17 00:00:00 2001 From: wp_xxyyzz Date: Sat, 26 Sep 2020 22:37:56 +0000 Subject: [PATCH] SpkToolbar: Prevent mouse clicks on hidden "More options" button. git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7700 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/spktoolbar/SpkToolbar/spkt_Pane.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/spktoolbar/SpkToolbar/spkt_Pane.pas b/components/spktoolbar/SpkToolbar/spkt_Pane.pas index f1915f67e..4889948cc 100644 --- a/components/spktoolbar/SpkToolbar/spkt_Pane.pas +++ b/components/spktoolbar/SpkToolbar/spkt_Pane.pas @@ -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