是在楼主提供的源码里截取的代码,应该还能再精简,楼主可以再研究下。
f12::
WinGet, ProcessName_A, ProcessName, A
CoordMode, Mouse
MouseGetPos, , , , HWND_3, 3
MouseGetPos, MXS, MYS,, tControlNN
CoordMode, Mouse, Window
MouseGetPos, MXWA, MYWA, tWinID, tControlID, 2
ControlNN := tControlNN, ControlID := tControlID
CoordMode, Pixel
ControlGetPos, CtrlX, CtrlY, CtrlW, CtrlH,, ahk_id %ControlID%
CtrlCAX := CtrlX - caX, CtrlCAY := CtrlY - caY
IsGetUTF8 := InStr(ControlNN, "Scintilla")
ControlGetText, CtrlText, , ahk_id %ControlID%
msgbox , %CtrlText% hqnnqh 发表于 2022-8-15 15:50
不愧是大佬,膜拜一下。
不过复制了你的代码到电脑上运行,很多地方的文字获取不到,比如说打开一个文件 ...
哈哈哈 我也是瞎蒙到的,其实下面的代码也能达到同样的效果
f12::
DetectHiddenWindows, On
MouseGetPos, x, y, winid, conid, 2
ControlGetText, contxt, , ahk_id %conid%
msgbox, %contxt%
页:
[1]