Toolbar on a popup menu

[ssimop]

I wonder whether it is possible to attach a toolbar on a popup menu generated with MenuPopup. If I would use a window visible trigger, how could I find the popup menu's specifications (window name, class).

[Gintaras]

Macro Macro2760

Code:

Copy      Help

int hh=SetWindowsHookEx(WH_CBT &sub.HookCbtProc 0 GetCurrentThreadId)

int r=ShowMenu("one[]two[]three")

UnhookWindowsHookEx hh


#sub HookCbtProc
function# code wParam lParam
if code=HCBT_CREATEWND and GetClassLong(wParam GCW_ATOM)=32768
,mac "Toolbar on QM popup menu"

ret CallNextHookEx(0 code wParam +lParam)

Toolbar Toolbar on QM popup menu

Code:

Copy      Help

test :out "test"; clo TriggerWindow

[ssimop]

Many thanks, it is perfect!

[ssimop]

Dear Gintaras,

Let me ask one additional relevant question : Is there any way to find the pop-up window's location and dimensions (GetWinXY). I need the in order to position this toolbar accordingly.

Many thanks in advance.

[Gintaras]

wParam is menu window handle.

[ssimop]

Thank you. I thought it was so. Therefore I have modified the hook function as it follows :

Macro Macro2760

Code:

Copy      Help

;www.quickmacros.com/forum/viewtopic.php?p=30301

int hh=SetWindowsHookEx(WH_CBT &sub.HookCbtProc 0 GetCurrentThreadId)

int r=ShowMenu("one[]two[]three")

UnhookWindowsHookEx hh


#sub HookCbtProc
function# code wParam lParam
if code=HCBT_CREATEWND and GetClassLong(wParam GCW_ATOM)=32768

,int x y cx cy
,GetWinXY wParam x y cx cy
,out F"{x} {y} {cx} {cy}"
,
,
,mac "Toolbar on QM popup menu"

ret CallNextHookEx(0 code wParam +lParam)

Nevertheless, I get 4 zeros.

Please, advise.

[Gintaras]

The window is created with zero size, then resized. Need to call GetWinXY later, eg set timer...

There is another hook API.
Macro Macro2761

Code:

Copy      Help

int hh=SetWinEventHook(EVENT_OBJECT_SHOW EVENT_OBJECT_SHOW 0 &sub.Hook_SetWinEventHook GetCurrentProcessId GetCurrentThreadId WINEVENT_OUTOFCONTEXT)
int r=ShowMenu("one[]two[]three")
UnhookWinEvent hh


#sub Hook_SetWinEventHook
function hHook event hwnd idObject idChild dwEventThread dwmsEventTime

;outw hwnd
if hwnd and GetClassLong(hwnd GCW_ATOM)=32768
,int x y cx cy
,GetWinXY hwnd x y cx cy
,out F"{x} {y} {cx} {cy}"
,
,
,;mac "Toolbar on QM popup menu"

[ssimop]

Thank you so much. I tested it, it works perfectly!