Find image below selected text

[Gintaras]

Macro Macro2447

Code:

Copy      Help

;find text as accessible object
int w=win("Quick Macros" "QM_Editor")
Acc a.Find(w "OUTLINEITEM" "Macro2444" "class=SysTreeView32[]id=2202" 0x1005)
;get object bottom in window client area
RECT ro rc
a.Location(0 ro.top 0 ro.bottom); ro.bottom+ro.top
DpiMapWindowPoints 0 w +&ro 2
;find image below the object
GetClientRect w &rc; rc.top=ro.bottom
scan "image:hBEFB13A3" w rc 1|2|16