非活动窗口能不能捕获鼠标事件？

[ylmg]

一个始终在最上面的窗口，
我需要它在非活动状态也能知道我的鼠标才上面move，怎么办啊？

[ylmg]

有没有人知道啊？

[ylmg]

有没有人知道啊？
无法实现吗？

[dageming]

顶

[dageming]

ding

[bootini]

响应消息，windows头文件里有鼠标移动的消息

[elilor]

把Timer1.Interval设置为50；

uses ShellApi;

procedure TForm1.Timer1Timer(Sender: TObject);
var
MousePos: TPoint;
rgn :HRGN;
begin
GetCursorPos(MousePos);
rgn :=CreateRectRgn(Left,Top,Left+Width,Top+Height);
if PtInRegion(rgn,MousePos.X,MousePos.Y) then
Caption:=inttostr(MousePos.X);
DeleteObject(rgn);
end;