Show a button's context menu when left clicked

[RooperGee]

I had written a GUI with several buttons and I wanted one of the buttons to show its context menu regardless of the user right or left clicking the button.  The whole purpose of the button was to show the user a menu of options and a context menu fit the need just fine, but I needed it to display with either click option.  I came up with the code below to accomplish this but I feel like I might be missing some very obvious easier way to do this and I feel it's a little lame to be forcing a right click mouse action on the button as a result of the user doing a left click, but it works!

Anyone have a suggestion of a better way to do this?  Otherwise, if this idea helps you, here you go.

#include <GUIConstantsEx.au3>

LeftClickContextTest()

Func LeftClickContextTest()
    Local $hGUI = GUICreate("My GUI", 200, 100)
    Local $button = GUICtrlCreateButton("Show Context", 15, 40, 85, 25)
    Local $close = GUICtrlCreateButton("Close", 110, 40, 85, 25)
    Local $context = GUICtrlCreateContextMenu($button)
    GUICtrlCreateMenuItem("Test Context Item 1", $context)
    GUICtrlCreateMenuItem("Test Context Item 2", $context)
    GUICtrlCreateMenuItem("Test Context Item 3", $context)
    GUISetState(@SW_SHOW, $hGUI)

    While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE, $close
                ExitLoop
            Case $button
                MouseClick("right", MouseGetPos(0), MouseGetPos(1), 1, 0)
        EndSwitch
    WEnd
EndFunc

 

[TheSaint]

Very late to the party, but saw this when looking for something else, so I thought I would contribute the following ... might help someone.

ControlClick($hGUI, "", $button, "right", 1)

That means the right-click context menu will appear when left clicking the button.