如何获取TWinControl的X，Y位置（相对于屏幕）

Question

我想在TWinControl中显示自定义提示，但我无法弄清楚如何获取它的位置。

使用位置0,0显示在屏幕顶部（窗口外）的提示，所以我猜它必须是屏幕上控件的位置。

编辑：

我发现的TControl物业ClientOrigin返回我所料，是正确使用ClientOrigin.X和ClientOrigin.Y？

Answer 1

TControl.ClientToScreen为您提供控件中给定点的屏幕坐标。

lPoint := Panel1.ClientToScreen(Point(0,0)); 
Label1.Caption := Format('Screen: %d, %d', [lPoint.X, lPoint.Y]);