hWnd:=WinExist("A")
hSysMenu:=DllCall("GetSystemMenu","Int",hWnd,"Int",FALSE)
if hSysMenu != 0
   msgbox

f11::

Loop
    If ExistAccName(WinExist("A"), "Close")  
        MsgBox
    return 

ExistAccName(winid, Desc)
{
    if !IsObject(AccObj := Acc_ObjectFromWindow(winid))
        Return 0 ;  "Не удалось получить IAccessible"  
    Return FindAccName(AccObj, Desc) ? 1 : 0
}    

FindAccName(AccObj, Desc)
{    
    try if (AccObj.accName(0) = Desc)  
        Return 1

    for k, v in Acc_Children(AccObj)
        if FindAccName(v, Desc)  
            Return 1
}  

loop
{
   Acc :=    Acc_ObjectFromPoint(child) 
   if   (Acc.accName(child)="Close")
      msgbox
}

Loop
    If ExistAccDescription(WinExist("A"), "Closes the window")  
        MsgBox
    return 

ExistAccDescription(winid, Desc)
{
    if !IsObject(AccObj := Acc_ObjectFromWindow(winid))
        Return 0 ;  "Не удалось получить IAccessible"  
    Return FindAccDescription(AccObj, Desc) ? 1 : 0
}    

FindAccDescription(AccObj, Desc)
{    
    try if (AccObj.accDescription(0) = Desc)  
        Return 1

    for k, v in Acc_Children(AccObj)
        if FindAccDescription(v, Desc)  
            Return 1
}