自动捕捉窗口

Question

怎么自动捕抓窗口???
http://bbs.csdn.net/topics/390208270
似乎没解决么...当前鼠标下,怎么确定是黄色的窗口而不是其他;
按照 myjian 的方法,保存下来的仅仅是各个窗口的区域,但是有重合的,就无法判断了;
难道只能使用hook鼠标的那个方法吗

Answer 1

procedure TForm1.Timer1Timer(Sender: TObject);
var
  pCursor: TPoint;
begin
  GetCursorPos(pCursor);
  Edit4.Text := IntToHex(WindowFromPoint(pCursor), 8);
end;

Answer 2

要是只想取顶层窗口，很简单，用 GetTopWindow 取出窗口 handle，判断一下就行了。要是还可以取任意窗口，就要判断窗口之间的上下层关系（Z order），取最上面那个。GetWindow 和 GetNextWindow 可以判断，程序稍微麻烦一点。

Answer 3

矩形命中，参考
http://www.cnblogs.com/del/archive/2008/06/10/1216462.html