yalanne, спасибо, но я предпочту вариант teadrinker, он компактнее. 
F11:: ToolTip % GetMenubarFocus(WinExist("A"))
GetMenubarFocus(hwnd)
{
static OBJID_MENU := 0xFFFFFFFD
VarSetCapacity(MBI, size := 4*4 + A_PtrSize*4, 0)
NumPut(size, MBI)
DllCall("GetMenuBarInfo", Ptr, hwnd, Int, OBJID_MENU, Int, 0, Ptr, &MBI)
Return *(&MBI + 4*4 + A_PtrSize*3) & 1
}А зачем всё это нужно? Подозреваю, хотите запустить пункт меню путем отправки окну нажатий клавиш.
]]>Вообще-то у меня и так работает:
F11:: MsgBox, % WinExist("ahk_class #32768") ? 1 : 0
Так работает только со стандартным контекстным меню.
Код же из поста 11 работает везде.
В этом можно удостовериться, нажав правую кнопку мыши в окне фаерфокса.
yalanne, спасибо, но я предпочту вариант teadrinker, он компактнее.
#Persistent
DllCall("LoadLibrary","Str","oleacc","Ptr"),
Acc_ObjectFromWindow(hWnd, idObject = 0)
{
If DllCall("oleacc\AccessibleObjectFromWindow", "Ptr", hWnd, "UInt", idObject&=0xFFFFFFFF, "Ptr"
, -VarSetCapacity(IID,16)+NumPut(idObject==0xFFFFFFF0?0x46000000000000C0:0x719B3800AA000C81
, NumPut(idObject==0xFFFFFFF0?0x0000000000020400:0x11CF3C3D618736E0,IID,"Int64"),"Int64"), "Ptr*", pacc)=0
Return ComObjEnwrap(9,pacc,1)
}
Acc_Parent(Acc) {
try parent:=Acc.accParent
return parent?Acc_Query(parent):
}
Acc_Query(Acc) {
try return ComObj(9, ComObjQuery(Acc,"{618736e0-3c3d-11cf-810c-00aa00389b71}"), 1)
}
F11::
if !(hWnd := WinExist("ahk_class #32768"))
return
Acc:=Acc_ObjectFromWindow(hWnd), P := Acc.AccName(0)
loop
if ((Acc := Acc_Parent(Acc_Parent(Acc_Parent(Acc)))).AccRole(0)=9)
P:= Acc.AccName(0) "`n" P
Until (Acc.AccRole(0)="")
msgbox % PF11:: MsgBox, % WinExist("ahk_class #32768") ? 1 : 0