Floppy Posted January 20, 2009 Posted January 20, 2009 (edited) Hello, I want to show the context menu on the control hovered by mouse. I'm writed this script...but it doesn't work: #include <GuiConstants.au3> $main=GUICreate("Test Window",500,400) GUICtrlCreateButton("Hello World!",100,100,50,50) GUICtrlCreateLabel("Hello World!",300,100,50,50) GUISetState(@SW_SHOW,$main) $cursor_info2=GUIGetCursorInfo($main) $ctrl_id=$cursor_info2[4] $ctrl_menu=GUICtrlCreateContextMenu($ctrl_id) GUICtrlCreateMenuItem("Test",$ctrl_menu) While 1 $m=GUIGetMsg() Select Case $m=$gui_event_close ExitLoop EndSelect WEnd bye #sorry for english# Edited January 20, 2009 by FSoft
MrCreatoR Posted January 20, 2009 Posted January 20, 2009 You can do it with GUICtrlSetOnHover UDF:expandcollapse popup#include <GuiConstants.au3> #include <GUICtrlSetOnHover_UDF.au3> ; Global $iShowMenu = False Global $hHover_CtrlID = 0 $hGUI = GUICreate("GUICtrlSetOnHover - Show Menu Example",500,400) $Button = GUICtrlCreateButton("Button", 100, 100, 50, 50) GUICtrlSetOnHover(-1, "_ShowMenu_Proc") $Label = GUICtrlCreateLabel("Label", 300, 100, -1, 15) GUICtrlSetOnHover(-1, "_ShowMenu_Proc") GUISetState(@SW_SHOW, $hGUI) $Dummy_Ctrl = GUICtrlCreateDummy() $Context_Menu = GUICtrlCreateContextMenu($Dummy_Ctrl) $Some_CMItem = GUICtrlCreateMenuItem("Some Item", $Context_Menu) $Exit_CMItem = GUICtrlCreateMenuItem("Exit", $Context_Menu) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE, $Exit_CMItem ExitLoop EndSwitch If $iShowMenu Then $iShowMenu = False _GUICtrlShowMenu($hGUI, $Context_Menu, $hHover_CtrlID) EndIf WEnd Func _ShowMenu_Proc($iCtrlID) $iShowMenu = True $hHover_CtrlID = $iCtrlID EndFunc ; Show a menu in a given GUI window which belongs to a given GUI ctrl Func _GUICtrlShowMenu($hWnd, $nContextID, $nContextControlID, $iMouse=0) Local $hMenu = GUICtrlGetHandle($nContextID) Local $iCtrlPos = ControlGetPos($hWnd, "", $nContextControlID) Local $iX = $iCtrlPos[0] Local $iY = $iCtrlPos[1] + $iCtrlPos[3] ; Convert the client (GUI) coordinates to screen (desktop) coordinates ;ClientToScreen Local $stPoint = DllStructCreate("int;int") DllStructSetData($stPoint, 1, $iX) DllStructSetData($stPoint, 2, $iY) DllCall("user32.dll", "int", "ClientToScreen", "hwnd", $hWnd, "ptr", DllStructGetPtr($stPoint)) $iX = DllStructGetData($stPoint, 1) $iY = DllStructGetData($stPoint, 2) ;ClientToScreen If $iMouse Then $iX = MouseGetPos(0) $iY = MouseGetPos(1) EndIf DllCall("user32.dll", "int", "TrackPopupMenuEx", "hwnd", $hMenu, "int", 0, "int", $iX, "int", $iY, "hwnd", $hWnd, "ptr", 0) EndFunc Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team
Floppy Posted January 21, 2009 Author Posted January 21, 2009 I get an error on line 46: _GUICtrlShowMenu($hGUI, $Context_Menu, $hHover_CtrlID)
MrCreatoR Posted January 21, 2009 Posted January 21, 2009 I get an error on line 46: _GUICtrlShowMenu($hGUI, $Context_Menu, $hHover_CtrlID)What error? and what version of GUICtrlSetOnHover you downloaded? Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now