Jump to content

Popup context menu not broadcasting control with multiple widows


Recommended Posts

Greetings fellows,

 

I have an issue that is bothering me for quite some time now (Since Autoit3 V3.3.8.0 and still not solved in 3.3.14.0) and i have not found any clue how to solve this particular problem regarding the control of popup-menus for specific controls. I have been searching using many keywords in the hope to find a similar posted issue either on the internet or here on this forum but did not yet stumbled upon it so i have no other option than to post the question (Sorry if there would exist an earlier topic).

Below is an example that demonstrates the issue very clearly if you follow the steps to reproduce:

#include <GuiMenu.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <WindowsConstants.au3>

$TestWindow1 = GUICreate("TestWindow1", 353, 277, 100, 80)
$ListView1 = GUICtrlCreateListView("", 8, 8, 338, 262)
$ListView1_0 = GUICtrlCreateListViewItem("TestItem1", $ListView1)
$ListView1_1 = GUICtrlCreateListViewItem("TestItem2", $ListView1)
$ListView1_2 = GUICtrlCreateListViewItem("TestItem3", $ListView1)
GUISetState(@SW_SHOW)

$TestWindow2 = GUICreate("TestWindow2", 353, 277, 100 + 400, 80)
$ListView2 = GUICtrlCreateListView("", 8, 8, 338, 262)
$ListView2_0 = GUICtrlCreateListViewItem("TestItem1", $ListView2)
$ListView2_1 = GUICtrlCreateListViewItem("TestItem2", $ListView2)
$ListView2_2 = GUICtrlCreateListViewItem("TestItem3", $ListView2)
GUISetState(@SW_SHOW)

GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")

Local $MenuContext, $MenuContext2
Local $ahLVMenu[3]
Local $ahLVMenu2[3]



For $i = 0 To 2
    $ahLVMenu[$i] = GUICtrlCreateDummy()
    $ahLVMenu2[$i] = GUICtrlCreateDummy()
Next



While 1
    Local $nMsg = GUIGetMsg(1)

    Switch $nMsg[0]
        Case $GUI_EVENT_CLOSE
            If $nMsg[1] == $TestWindow2 Then
                GUISetState(@SW_HIDE, $nMsg[1])
            Else
                Exit
            EndIf

        Case $ahLVMenu[0]
            ConsoleWrite("Dialog 1, Item 1" & @CRLF)

        Case $ahLVMenu[1]
            ConsoleWrite("Dialog 1, Item 2" & @CRLF)

        Case $ahLVMenu[2]
            ConsoleWrite("Dialog 1, Item 3" & @CRLF)

        Case $ahLVMenu2[0]
            ConsoleWrite("Dialog 2, Item 1" & @CRLF)

        Case $ahLVMenu2[1]
            ConsoleWrite("Dialog 2, Item 2" & @CRLF)

        Case $ahLVMenu2[2]
            ConsoleWrite("Dialog 2, Item 3" & @CRLF)

    EndSwitch
WEnd



Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
    #forceref $hWnd, $Msg, $wParam
    Local $hWndFrom, $iIDFrom, $event, $tNMHDR, $hWndListView, $hWndListView2, $tInfo
    $hWndListView = $ListView1
    $hWndListView2 = $ListView2
    Local $tMsgFilter, $hMenu
    If Not IsHWnd($ListView1) Then $hWndListView = GUICtrlGetHandle($ListView1)
    If Not IsHWnd($ListView2) Then $hWndListView2 = GUICtrlGetHandle($ListView2)

    $tNMHDR = DllStructCreate($tagNMHDR, $lParam)
    $hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
    $iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
    $event = DllStructGetData($tNMHDR, "Code")
    Switch $hWndFrom
        Case $hWndListView2

            Switch $event
                Case $NM_RCLICK ; Sent by a list-view control when the user clicks an item with the right mouse button
                    _LV_PopUpMenu2() ; Show popup context menu in Pharmacist article list

            EndSwitch

        Case $hWndListView
            Switch $event
                Case $NM_RCLICK ; Sent by a list-view control when the user clicks an item with the right mouse button
                    _LV_PopUpMenu() ; Show popup context menu in Pharmacist article list

            EndSwitch

    EndSwitch
    $hWndFrom = 0
    $iIDFrom = 0
    $tNMHDR = 0
    $hWndListView = 0
    $hWndListView2 = 0
    $tInfo = 0
    $tMsgFilter = 0
    $hMenu = 0
    Return $GUI_RUNDEFMSG

EndFunc   ;==>WM_NOTIFY



Func _LV_PopUpMenu()

    $MenuContext = _GUICtrlMenu_CreatePopup(40)
    _GUICtrlMenu_InsertMenuItem($MenuContext, 0, "Dialog 1, item 1", $ahLVMenu[0])
    _GUICtrlMenu_InsertMenuItem($MenuContext, 1, "Dialog 1, item 2", $ahLVMenu[1])
    _GUICtrlMenu_InsertMenuItem($MenuContext, 2, "Dialog 1, item 3", $ahLVMenu[2])
    _GUICtrlMenu_TrackPopupMenu($MenuContext, $TestWindow1)
    _GUICtrlMenu_DestroyMenu($MenuContext)
    Return $GUI_RUNDEFMSG
EndFunc   ;==>_LV_PopUpMenu



Func _LV_PopUpMenu2()

    $MenuContext2 = _GUICtrlMenu_CreatePopup(40)
    _GUICtrlMenu_InsertMenuItem($MenuContext2, 0, "Dialog 2, item 1", $ahLVMenu2[0])
    _GUICtrlMenu_InsertMenuItem($MenuContext2, 1, "Dialog 2, item 2", $ahLVMenu2[1])
    _GUICtrlMenu_InsertMenuItem($MenuContext2, 2, "Dialog 2, item 3", $ahLVMenu2[2])
    _GUICtrlMenu_TrackPopupMenu($MenuContext2, $TestWindow2)
    _GUICtrlMenu_DestroyMenu($MenuContext2)
    Return $GUI_RUNDEFMSG
EndFunc   ;==>_LV_PopUpMenu2


I have two window dialogs and two listview controls defined.

Each listview control has its own popup menu and menu items.

The code above works fine as long as both window dialogs are visible.

You can right-click on each listview control and you get the designated menu popped up and if you select an item, the message for the specific item is being written into the console frame for it.

However, if you close window 2, and attempt to trigger the options in the popup menu for window 1, you will notice that the notification messages are no longer being triggered at all.

The popup menu becomes visible if you right-click the area and disappears if you select an option, but the control item no longer sends a notification which means that the attached events for the trapping are no longer being executed.

Now if you switch the code snippets of the window frames being generated, you will notice you can achieve the same issue the other way round, which means that context menu item notifications are being received and trigger an event routine as long as window 1 would then in that case remain open.

So it seems that whichever window is generated the last, that window somehow seems to get attached to the notification messages that are being send by the dummy controls for the context menu items.

Do i misinterpret something here, is there a fix for this issue or did i encountered some kind of bug inside Autoit3?

 

Edited by lbsl
Minor issue in code resolved to prevent distraction from real issue
Link to post
Share on other sites

Hi

you create all dummy on GUI2

its a dummy place problem, this one works for me :

 

#include <GuiMenu.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <WindowsConstants.au3>

$TestWindow1 = GUICreate("TestWindow1", 353, 277, 100, 80)
$ListView1 = GUICtrlCreateListView("", 8, 8, 338, 262)
$ListView1_0 = GUICtrlCreateListViewItem("TestItem1", $ListView1)
$ListView1_1 = GUICtrlCreateListViewItem("TestItem2", $ListView1)
$ListView1_2 = GUICtrlCreateListViewItem("TestItem3", $ListView1)
GUISetState(@SW_SHOW)

;Change here <=================================================
Local $ahLVMenu[3]
For $i = 0 To 2
    $ahLVMenu[$i] = GUICtrlCreateDummy()
Next
;Change end <=================================================

$TestWindow2 = GUICreate("TestWindow2", 353, 277, 100 + 400, 80)
$ListView2 = GUICtrlCreateListView("", 8, 8, 338, 262)
$ListView2_0 = GUICtrlCreateListViewItem("TestItem1", $ListView2)
$ListView2_1 = GUICtrlCreateListViewItem("TestItem2", $ListView2)
$ListView2_2 = GUICtrlCreateListViewItem("TestItem3", $ListView2)
GUISetState(@SW_SHOW)

;Change here <=================================================
Local $ahLVMenu2[3]
For $i = 0 To 2
    $ahLVMenu2[$i] = GUICtrlCreateDummy()
Next
;Change end <=================================================

GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")

Local $MenuContext, $MenuContext2

;Wrong part <=================================================
;~ Local $ahLVMenu[3]
;~ Local $ahLVMenu2[3]

;Wrong part <=================================================
;~ For $i = 0 To 2
;~     $ahLVMenu[$i] = GUICtrlCreateDummy()
;~     $ahLVMenu2[$i] = GUICtrlCreateDummy()
;~ Next

While 1
    Local $nMsg = GUIGetMsg(1)

    Switch $nMsg[0]
        Case $GUI_EVENT_CLOSE
            If $nMsg[1] == $TestWindow2 Then
                GUISetState(@SW_HIDE, $nMsg[1])
            Else
                Exit
            EndIf

        Case $ahLVMenu[0]
            ConsoleWrite("Dialog 1, Item 1" & @CRLF)

        Case $ahLVMenu[1]
            ConsoleWrite("Dialog 1, Item 2" & @CRLF)

        Case $ahLVMenu[2]
            ConsoleWrite("Dialog 1, Item 3" & @CRLF)

        Case $ahLVMenu2[0]
            ConsoleWrite("Dialog 2, Item 1" & @CRLF)

        Case $ahLVMenu2[1]
            ConsoleWrite("Dialog 2, Item 2" & @CRLF)

        Case $ahLVMenu2[2]
            ConsoleWrite("Dialog 2, Item 3" & @CRLF)

    EndSwitch
WEnd



Func WM_NOTIFY($hWnd, $Msg, $wParam, $lParam)
    #forceref $hWnd, $Msg, $wParam
    Local $hWndFrom, $iIDFrom, $event, $tNMHDR, $hWndListView, $hWndListView2, $tInfo
    $hWndListView = $ListView1
    $hWndListView2 = $ListView2
    Local $tMsgFilter, $hMenu
    If Not IsHWnd($ListView1) Then $hWndListView = GUICtrlGetHandle($ListView1)
    If Not IsHWnd($ListView2) Then $hWndListView2 = GUICtrlGetHandle($ListView2)

    $tNMHDR = DllStructCreate($tagNMHDR, $lParam)
    $hWndFrom = HWnd(DllStructGetData($tNMHDR, "hWndFrom"))
    $iIDFrom = DllStructGetData($tNMHDR, "IDFrom")
    $event = DllStructGetData($tNMHDR, "Code")
    Switch $hWndFrom
        Case $hWndListView2

            Switch $event
                Case $NM_RCLICK ; Sent by a list-view control when the user clicks an item with the right mouse button
                    _LV_PopUpMenu2() ; Show popup context menu in Pharmacist article list

            EndSwitch

        Case $hWndListView
            Switch $event
                Case $NM_RCLICK ; Sent by a list-view control when the user clicks an item with the right mouse button
                    _LV_PopUpMenu() ; Show popup context menu in Pharmacist article list

            EndSwitch

    EndSwitch
    $hWndFrom = 0
    $iIDFrom = 0
    $tNMHDR = 0
    $hWndListView = 0
    $hWndListView2 = 0
    $tInfo = 0
    $tMsgFilter = 0
    $hMenu = 0
    Return $GUI_RUNDEFMSG

EndFunc   ;==>WM_NOTIFY



Func _LV_PopUpMenu()

    $MenuContext = _GUICtrlMenu_CreatePopup(40)
    _GUICtrlMenu_InsertMenuItem($MenuContext, 0, "Dialog 1, item 1", $ahLVMenu[0])
    _GUICtrlMenu_InsertMenuItem($MenuContext, 1, "Dialog 1, item 2", $ahLVMenu[1])
    _GUICtrlMenu_InsertMenuItem($MenuContext, 2, "Dialog 1, item 3", $ahLVMenu[2])
    _GUICtrlMenu_TrackPopupMenu($MenuContext, $TestWindow1)
    _GUICtrlMenu_DestroyMenu($MenuContext)
    Return $GUI_RUNDEFMSG
EndFunc   ;==>_LV_PopUpMenu



Func _LV_PopUpMenu2()

    $MenuContext2 = _GUICtrlMenu_CreatePopup(40)
    _GUICtrlMenu_InsertMenuItem($MenuContext2, 0, "Dialog 2, item 1", $ahLVMenu2[0])
    _GUICtrlMenu_InsertMenuItem($MenuContext2, 1, "Dialog 2, item 2", $ahLVMenu2[1])
    _GUICtrlMenu_InsertMenuItem($MenuContext2, 2, "Dialog 2, item 3", $ahLVMenu2[2])
    _GUICtrlMenu_TrackPopupMenu($MenuContext2, $TestWindow2)
    _GUICtrlMenu_DestroyMenu($MenuContext2)
    Return $GUI_RUNDEFMSG
EndFunc   ;==>_LV_PopUpMenu2

Edit: for clarify :

 

Quote

GUICtrlCreateDummy : Creates a Dummy control for the GUI.

=

GUICtrlCreateDummy : Creates a Dummy control for the last GUICreate

 

Edited by Synapsee
Link to post
Share on other sites
53 minutes ago, Synapsee said:

Hi

you create all dummy on GUI2

its a dummy place problem, this one works for me :

expandpopup

GUICtrlCreateDummy : Creates a Dummy control for the GUI.

=

GUICtrlCreateDummy : Creates a Dummy control for the last GUICreate

 

 

Thanks a million!!

This seems logic, but was not obvious for me on the surface.

 

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • By yffulf
      Is there probably a way to click ie popup button and hide or invisible popup button in the same time?
      I try to use WinSetState @SW_hide ,
      the result is ie crashing or no response because button hide and the next click command won't work...
      $oForm=_IEFormGetObjByName($oIE,"form1") $obutton=_IEFormElementGetObjByName($oForm,"btn_OK") $hWnd = _IEPropertyGet($oIE, "hwnd") _IEAction($obutton,"focus") ControlSend($hWnd, "", "[CLASS:Internet Explorer_Server; INSTANCE:1]", "{Enter}") WinWait("", "確定存檔嗎?") WinSetState("","確定存檔嗎?",@SW_Hide) ControlClick("", "確定存檔嗎?", "[CLASS:Button; TEXT:確定; Instance:1;]")  
    • By Rhidlor
      First off, the project I'm working on revolves around AS/400 "Client Access software", it's foundation is directly influenced by the thread linked at the bottom of this post. Moving on, to explain the problem I'm facing; my project utilizes an infinite While loop and automatically performs semi-hard coded monotonous tasks to save users time and effort, the problem is, occasionally and unexpectedly "Display Messages" will popup and the core script will continue executing instead of dismissing said message and the script "breaks". As a countermeasure I've added some code to the While loop in an effort to intervene and dismiss these display messages before the core script has a chance to do anything... however it doesn't work. I hope I didn't do too bad of a job explaining that. 
      So I think my question is: How can I temporarily "pause" the core script when these messages spontaneously appear?
      The only other solution I thought of would be to check if a display message has appeared before executing every line of code but that obviously isn't very practical.
      Any and all help is greatly appreciated!
      Thanks
       
      ;Loop to keep script running and handle display messages While 1 dismiss_display_messages() Sleep(50) WEnd ;Function to dismiss display messages Func dismiss_display_messages() If $ps.SearchText("Display Messages") Then $ps.SendKeys("[enter]", 8, 1) ;This while loop waits until the display message has disappeared to resume the core script While $ps.SearchText("Display Messages") Sleep(100) WEnd EndIf EndFunc  
       
    • By nooneclose
      I need to send a string of text to this popup and click on the ok button to save it.
      Here is the code I have so far:
      ;Start IE Sleep(7000) $oIE = _IECreate("http://www.google.com") Sleep(500) _IELoadWait($oIE) $hIE = _IEPropertyGet($oIE, "hwnd") ; Get Handle of the IE window Sleep(500) WinSetState($hIE, "", @SW_MAXIMIZE) ;Wait for a browser page load to complete Sleep(3000) _IENavigate($oIE, "https://properURL.com") Sleep(8000) _IELoadWait($oIE) ;Attach to a browser control embedded in another window $oIE = _IEAttach("https://"properURL.com", url") ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $oIE = ' & $oIE & @CRLF & '>Error code: ' & @error & ' Extended code: 0x' & Hex(@extended) & @CRLF) ;### Debug Console Sleep(2000) ;Get the title of the webpage ;Local $wTitle = _IEPropertyGet($oIE, "title") ;MsgBox($MB_SYSTEMMODAL, "Webpage title:", $wTitle) ;Clicks the new button Sleep(3000) _IEAction($nWorkOrderB, "focus") _IEAction($nWorkOrderB, "click") Sleep(5000) ;Store the Element names where the important data will be sent ;Store the long description button Local $wLongDButton = _IEGetObjById($oIE, "m65d795a4-img") ;Store the long Description field id Local $wComments = _IEGetObjById($oIE, "ma6499a9c-rte_iframe") ;Store the ok button id that is in the long description Local $wCommOk = _IEGetObjById($oIE, "m74031266-pb") ;******************************************************************************* ; Send the stored data to the proper field ;******************************************************************************* ;Click the long description button Sleep(300) _IEAction($wLongDButton, "focus") _IEAction($wLongDButton, "click") Sleep(300) ;Sends the Comments Sleep(500) _IEAction($wComments, "focus") _IEAction($wComments, "click") Sleep(500) _IEFormElementSetValue($wComments, "hello darkness my old friend") ;Click the ok button Sleep(500) _IEAction($wCommOk, "focus") _IEAction($wCommOk, "click") Sleep(500)  
      Here is the popup:

    • By AndyS19
      I'm trying to implement a Ctl-F popup box that looks something like the one that Notepad uses, but I'm not havine much luck.  I intend to get it working, then beef up the popup's contents to add several checkboxes, buttons and radio boxes.
      What my example code does is to use InputBox(), but that's not what I want.
      Here is my test code:
      #include <Array.au3> #include <GUIConstantsEx.au3> #AutoIt3Wrapper_Au3Check_Parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 Opt("GUICloseOnESC", 1) Opt("GUIOnEventMode", 1) Opt('MustDeclareVars', 1) OnAutoItExitRegister("ExitStageLeft") Opt("WinTitleMatchMode", -2) Global $hGUI _Main() Func _Main() $hGUI = GUICreate("Test ^F", 300, 200) setupSpecialKeysHandlers() GUISetOnEvent($GUI_EVENT_CLOSE, "Event_GUIClose") GUISetState() While (1) Sleep(157) WEnd EndFunc ;==>_Main Func handle_CTRL_F_key() Local $str $str = InputBox("Search", "Enter the string to search for:") ConsoleWrite("+++: $str ==>" & $str & "<==" & @CRLF) EndFunc ;==>handle_CTRL_F_key Func ExitStageLeft() Exit (99) EndFunc ;==>ExitStageLeft Func Event_GUIClose() Exit (1) EndFunc ;==>Event_GUIClose Func setupSpecialKeysHandlers() Local $ar, $parts, $key, $handler, $id Local $aAccelKeys[1][2] ; Create a table of Special keys and their handlers $ar = StringSplit("", "") _ArrayAdd($ar, "^f - handle_CTRL_F_key ") ReDim $aAccelKeys[UBound($ar) - 1][2] ; Now, create $aAccelKeys array with the table data. ; For each entry, create a Dummy GUI and associate its ; ID with the special key. For $ndx = 1 To UBound($ar) - 1 $parts = StringSplit($ar[$ndx], "-", 2) $key = StringStripWS($parts[0], 8) $handler = StringStripWS($parts[1], 8) $id = GUICtrlCreateDummy() $aAccelKeys[$ndx - 1][0] = $key $aAccelKeys[$ndx - 1][1] = $id GUICtrlSetOnEvent($id, $handler) Next GUISetAccelerators($aAccelKeys) ; Setup the Special keys hooks EndFunc ;==>setupSpecialKeysHandlers  
    • By help_me_please
      Hello forum world,
      I am having an issue with a popup window displaying after selecting something using the ControlCommand( ) function.
      I am able to select the desired item from the dropdown list using the control command function but a popup window opens immediately after, not allowing the control command function to finish.
      Such as:
      ConsoleWrite("Before ControlCommand" & @CRLF)
      ControlCommand($Win_Name, "", $ID, "SelectString", $DropItemName)
      ConsoleWrite("After ControlCommand" & @CRLF)
       
      ^^^^
      So in the console I can get the "Before...", then the ControlCommand executes the selection of the dropdown menu.  Popup window opens
      But since there is a popup, I can not get the "After..." statement to write to the console. 
      This is where I am stuck, as I can not execute another command to close the popup window.
       
      Send help, oh gracious autoit forum.  
×
×
  • Create New...