GUICtrlCreateContextMenu - GUIGetMsg()

  • Erstmal ein freundliches Hallo zusammen :)

    Ich wollte in einer ListView noch ein Context Menü verwenden. Beispiele gibt es ja auch genug aber nach klicken auf
    den jeweiligen Menüpunkt erhalte ich leider keinerlei Reaktion. Sicherlich ein simples Problem aber finde den Fehler einfach nicht und ich stehe völlig auf dem Schlauch was die Ursache sein könnte, vermutlich aber ein Fehler in GUIGetMsg()?

    Spoiler anzeigen
    [autoit]

    #include <GuiListView.au3>
    #include <StructureConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ListViewConstants.au3>
    #include <WindowsConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    $title = "xxx"
    Global $Editor
    Global $contextmenu, $item1, $item2, $nMsg

    [/autoit] [autoit][/autoit] [autoit]

    Opt("GUIOnEventMode", 1)

    [/autoit] [autoit][/autoit] [autoit]

    $Editor = GUICreate($title, 1015, 711, -1, -1, BitOR($WS_MAXIMIZEBOX, $WS_MINIMIZEBOX, $WS_SYSMENU, $WS_CAPTION, $WS_POPUP, $WS_POPUPWINDOW, $WS_GROUP, $WS_TABSTOP, $WS_BORDER, $WS_CLIPSIBLINGS))
    GUISetOnEvent($GUI_EVENT_CLOSE, "EditorClose")
    GUICtrlSetResizing(-1, $GUI_DOCKLEFT + $GUI_DOCKBOTTOM)

    [/autoit] [autoit][/autoit] [autoit]

    ;##### TAB 3 ##############################################################################################################
    $TabSheet3 = GUICtrlCreateTabItem("Entry Points")
    $EntryPointlistview = GUICtrlCreateListView("Entry Point | Aktiv | Shortcuts ", 25, 98, 790, 586)
    $contextmenu = GUICtrlCreateContextMenu($EntryPointlistview)
    $item1 = GUICtrlCreateMenuItem("Test_1", $contextmenu)
    $item2 = GUICtrlCreateMenuItem("Test_2", $contextmenu)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUICtrlCreateTabItem("")
    ;##### END TAB 3 ##########################################################################################################

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreateListViewItem ( "text|text", $EntryPointlistview )

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $EntryPointlistview
    MsgBox(0, "listview", "clicked=" & GUICtrlGetState($EntryPointlistview), 2)
    Case $item1
    MsgBox(0, "Test", "Bearbeiten")
    Case $item2
    MsgBox(0, "Test", "Löschen")
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func EditorClose()
    Exit
    EndFunc ;==>EditorClose

    [/autoit]

    Danke und gruß
    nasowas

    Einmal editiert, zuletzt von nasowas (27. Januar 2010 um 10:52)