own right click actions on Quick Launch icons

[Gintaras]

Macro Macro253
Trigger: #Rh1 /EXPLORER /FF_Macro253

Code:

Copy      Help

mes _command

Filter function FF_Macro253

Code:

Copy      Help

;/
function# iid FILTER&f

if(!f.hwnd2) ret
if(!wintest(f.hwnd "" "Shell_TrayWnd")) ret
if(!childtest(f.hwnd2 "Quick Launch" "ToolbarWindow32" f.hwnd)) ret

Acc a=acc(mouse); err ret
if(!a.elem) ret ;;not on button
str s=a.Name
mac "Macro253" s
ret -1