Menubar click detection?

[Mikeman27294]

Hello everyone.

I am gurrently working on a small project, and I have not gotten too far in, and I am trying to understand how to get a menubar to work. I have made my menubar, but the problem is that when I click on an item in the menubar assigned to a variable, using the GUIGetMsg function to detect if it is clicked, it does not respond.

This is a similar code (I am showing this because it is smaller and easier for me to get my head around)

#include <GUIConstantsEX.au3>
#include <GuiMenu.au3>
#include <WindowsConstants.au3>

Global $hGUI        = GUICreate("Program", @DesktopWidth*0.75, @DesktopHeight*0.75, @DesktopWidth*0.125, @DesktopHeight*0.125, 0x010F0000)
GUISetState()
;CREATING THE FILE MENU
    Local $hFile        = _GUICtrlMenu_CreateMenu()
    Local $hFNew        = _GUICtrlMenu_InsertMenuItem($hFile, 0, "&New")
    Local $hFOpen       = _GUICtrlMenu_InsertMenuItem($hFile, 1, "&Open")
    Local $hFSave       = _GUICtrlMenu_InsertMenuItem($hFile, 2, "&Save")
                          _GUICtrlMenu_InsertMenuItem($hFile, 3, "")
    Global $hFExit      = _GUICtrlMenu_InsertMenuItem($hFile, 4, "&Exit")
;CREATING THE MENUBAR
    Local $hMenu        = _GUICtrlMenu_CreateMenu(1)
                          _GUICtrlMenu_InsertMenuItem($hMenu, 1, "&File", 1, $hFile)
                          _GUICtrlMenu_SetMenu($hGUI, $hMenu)

_Main()

Func _Main()
    While 1
        $msg = GUIGetMsg(1)
        Select
            Case $msg[0] = $GUI_EVENT_CLOSE
                Exit
            Case $msg[0] = $hFExit
                Exit
        EndSelect
    WEnd
EndFunc

So when I click on Exit in the file menu, it should exit the program, but it doesnt.

I have looked in the help file and the forums but found nothing. Does anybody know where I am going wrong?

Thanks.

Michael Thompson

[ahmet]

GUIGetMsg() works only with controls created using GUICtrlCreate...().

[UEZ]

Try this:

expandcollapse popup

#include <GUIConstantsEX.au3>
#include <GuiMenu.au3>
#include <WindowsConstants.au3>


Global $hGUI        = GUICreate("Program", @DesktopWidth*0.75, @DesktopHeight*0.75, @DesktopWidth*0.125, @DesktopHeight*0.125, 0x010F0000)

Global Enum $idExit = 1000, $idNew, $idOpen, $idSave
;CREATING THE FILE MENU
    Local $hFile        = _GUICtrlMenu_CreateMenu()
    Local $hFNew        = _GUICtrlMenu_InsertMenuItem($hFile, 0, "&New", $idNew)
    Local $hFOpen       = _GUICtrlMenu_InsertMenuItem($hFile, 1, "&Open", $idOpen)
    Local $hFSave       = _GUICtrlMenu_InsertMenuItem($hFile, 2, "&Save", $idSave)
                          _GUICtrlMenu_InsertMenuItem($hFile, 3, "")
    Global $hFExit      = _GUICtrlMenu_InsertMenuItem($hFile, 4, "&Exit", $idExit)
;CREATING THE MENUBAR
    Local $hMenu        = _GUICtrlMenu_CreateMenu(1)
                          _GUICtrlMenu_InsertMenuItem($hMenu, 1, "&File", 1, $hFile)
                          _GUICtrlMenu_SetMenu($hGUI, $hMenu)

GUISetState()

GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")

_Main()

Func _Main()
    While 1
        $msg = GUIGetMsg(1)
        Select
            Case $msg[0] = $GUI_EVENT_CLOSE
                Exit
            Case $msg[0] = $hFExit
                Exit
        EndSelect
    WEnd
EndFunc

Func WM_COMMAND($hWnd, $Msg, $wParam, $lParam)
    #forceref $hWnd, $Msg, $wParam, $lParam
    Switch $wParam
        Case $idExit
            Exit MsgBox(0, "Information", "Closing")
        Case $idNew
            MsgBox(0, "Information", "Your new function starts here")
        Case $idOpen
            MsgBox(0, "Information", "Your open function starts here")
        Case $idSave
            MsgBox(0, "Information", "Your save function starts here")
    EndSwitch
    Return "GUI_RUNDEFMSG"
EndFunc   ;==>WM_COMMAND

Br,

UEZ

[GEOSoft]

Or this one.

#include <GUIConstantsEX.au3>
;#include <GuiMenu.au3>  ;; This UDF has limited usage so don't use it when possible
#include <WindowsConstants.au3>

Global $hGUI        = GUICreate("Program", @DesktopWidth*0.75, @DesktopHeight*0.75, @DesktopWidth*0.125, @DesktopHeight*0.125, 0x010F0000)

;CREATING THE FILE MENU
    Local $hFile        = GUICtrlCreateMenu("&File")
    Local $hFNew        = GUICtrlCreateMenuItem("&New", $hFile)
    Local $hFOpen       = GUICtrlCreateMenuItem("&Open", $hFile)
    Local $hFSave       = GUICtrlCreateMenuItem("&Save", $hFile)
                          GUICtrlCreateMenuItem("", $hFile)
    Global $hFExit      = GUICtrlCreateMenuItem("&Exit", $hFile)
;CREATING THE MENUBAR
    ;Local $hMenu        = GUICtrlCreateMenu(1)
     ;                     GUICtrlCreateMenuItem($hMenu, 1, "&File", 1, $hFile)
     ;                     _GUICtrlMenu_SetMenu($hGUI, $hMenu)
GUISetState()

_Main()

Func _Main()
    While 1
        $msg = GUIGetMsg()
        Switch $Msg
            Case $GUI_EVENT_CLOSE, $hFExit
                Exit
            Case $hFNew To $hFSave
                MsgBox(0, "Item Clicked", GUICtrlRead($msg, 1))
        EndSwitch
    WEnd
EndFunc

[Mikeman27294]

I said thanks earlier but it obviously didnt send. Thanks to all of you, all of your suggestions worked, but in the end, my brother showed me GUICtrlCreateMenu and so that is what I am using, and so I guess that GEOSoft got the best answer as far as coder friendly, but also, I cannot say that without saying that UEZ's code worked a charm, and ahmet's input helped me understand why what I was doing didnt work. Hahaha You are a Bright bunch (), aren't you?

Thank you all, now I just need to figure out how to mark this as solved.

[guinness]

Or this is an Example if you just want to monitor when GUICtrlCreateMenu is Clicked >>

[Mikeman27294]

Yeah I got my menu working right now. Thanks though.