Accessible Objects - List of possible actions?

[Gintaras]

Max 1 action is accessible, and it is called "default". To see what it does, click the Properties button in dialog "Find accessible object". To see actions of all objects, run this macro.

Macro Macro7

Code:

Copy      Help

out
int w=win("Accessible Objects - List of possible actions? - Google Chrome" "Chrome_WidgetWin_1")
Acc a.Find(w "DOCUMENT" "Accessible Objects - List of possible actions?" "" 0x3001)
ARRAY(Acc) b
a.GetChildObjects(b -1)
int i
for i 0 b.len
,str da=b[i].a.DefaultAction(b[i].elem); err continue
,if(da.len=0) continue
,str role name
,b[i].Role(role)
,name=b[i].Name
,out F"{role%%-10s}  name={name%%-20s}  action={da}"