一个鼠标坐标问题？

Question

鼠标在客户区的坐标是x,y，请问在整个桌面的坐标的坐标函数是什么？

Answer 1

var
  tp: TPoint;
begin
  tp := ClientToScreen(point(x, y));
end

Answer 2

var
  pt:TPoint;
begin
  pt:=clienttoscreen(point(x,y));
  showmessage(inttostr(pt.X)+' '+inttostr(pt.Y));
end;

Answer 3

好象不对啊，如果form有个TEdit，那怎么得到TEdit的屏幕坐标！