Как я могу получить X, Y позицию TWinControl (относительно экрана)

Я пытаюсь показать пользовательский намек в TWinControl, но я не могу понять, как получить его положение.

Использование позиции 0,0 показывает подсказку в верхней части экрана (вне окна), поэтому я предполагаю, что это должно быть положение элемента управления на экране.

Edit:

Я нашел TControl Property ClientOrigin, который возвращает то, что я ожидал, правильно ли использовать ClientOrigin.X и ClientOrigin.Y?

Ответ 1

TControl.ClientToScreen дает координаты экрана для заданной точки внутри элемента управления.

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