如何取得一个控件在屏幕上的绝对位置！！请高手指点！

Question

如何取得一个控件在屏幕上的绝对位置！！

Answer 1

我想是：控件所在Form的Top。 Left值，加控件本身的Top、 Left值。

Answer 2

left=form.left+component.left;
top=from.top+component.top;

Answer 3

控件所在的Form的TOP还有一个标题栏的高度，有没有API之类的好的办法

Answer 4

GetwindowRect 
GetClientRect
以上两个API可实现你要的效果，具体使用参见DELPHI  Api32 帮助

Answer 5

举个例子：
var
  T:TPoint;
begin
  T.X:= Bitbtn1.Left;
  T.Y:= Bitbtn1.Top;
  T:= ClientToScreen( T );
end;
T就是Bitbtn1的绝对位置