Question

VB获取窗口下，鼠标光标位置所在的控件句柄

比如说窗口下坐标（200,200）有一个按钮控件。我怎么获取这个位置的按钮的句柄？

Answer 1

API:
GetForegroundWindow 可以获取到有焦点的顶层窗口。

获取有焦点的子窗口只能用GetFocus，但是如果当前顶层窗口属于其他线程，GetFocus将返回NULL。没有好的办法解决，除非AttachThreadInput或者用钩子（HOOK）。

Answer 2

声明api: 函数WindowFromPoint
类型POINTAPI

'-----------------------------
dim pt as POINTAPI
pt.x=200
pt.y=200
dim PThWnd as long
PThWnd=WindowFromPoint(pt)
msgbox PThWnd
'----------------------------
手写的，不排除会有输入错误，但是算法是正确的。。。。

按钮控件不可用时，显示控件，但是不接受消息，所以得不到句柄

Answer 3

先获取鼠标当前的坐标，再获取当前坐标下的对象够柄