Sign in to follow this  
Followers 0
Floppy

Context Menu on Hovered Control

4 posts in this topic

#1 ·  Posted (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 by FSoft

Share this post


Link to post
Share on other sites



You can do it with GUICtrlSetOnHover UDF:

#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_Rus_Community.png AutoIt Russian Community

My Work...

Spoiler

AutoIt_Icon_small.pngProjects: 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 Program

AutoIt_Icon_small.pngUDFs: 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
 
AutoIt_Icon_small.pngExamples: 
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 AutoIt_Rating.gif)

* === My topics === *

==================================================
My_Userbar.gif
==================================================

 

 

 

AutoIt is simple, subtle, elegant. © AutoIt Team

Share this post


Link to post
Share on other sites

I get an error on line 46:

_GUICtrlShowMenu($hGUI, $Context_Menu, $hHover_CtrlID)

Share this post


Link to post
Share on other sites

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_Rus_Community.png AutoIt Russian Community

My Work...

Spoiler

AutoIt_Icon_small.pngProjects: 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 Program

AutoIt_Icon_small.pngUDFs: 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
 
AutoIt_Icon_small.pngExamples: 
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 AutoIt_Rating.gif)

* === My topics === *

==================================================
My_Userbar.gif
==================================================

 

 

 

AutoIt is simple, subtle, elegant. © AutoIt Team

Share this post


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
Sign in to follow this  
Followers 0