怎么在鼠标双击事件中取得鼠标当前位置？？？？？

Question

怎么在鼠标双击事件中取得鼠标当前位置？？？？？

Answer 1

查找一下Delphi帮助吧。
控件.GetCursorPos，相对于控件的位置，在时要转换为屏幕位置来处理。
API函数：Getcursorpos(point)直接获取屏幕位置。
具体用法见help.

Answer 2

mouse.CursorPos.X
mouse.CursorPos.y

Answer 3

为什么一定要在双击事件中得到?
双击事件之前回发生什么?
对了,Click和MouseDown事件.
其中MouseDown事件中可以得到鼠标位置对吧
这不就成了，在form中声明一个TPoint变量，在MouseDown事件中把鼠标位置给这个变量
然后在鼠标双击事件中不就可以得到位置了吗

Answer 4

用api函数GetCursorPos这个，，，里面有一个tpoint类的实例，，你要传一下，，就可以了，，var
a:tpoint;
begin
GetCursorPos(a);
showmessage(inttostr(a.left));
showmessage(inttostr(a.top));
end;