如何在表单上获得光标位置？

Question

我需要在表单上获取光标位置，我该怎么做？

Answer 1

将Mouse.CursorPos传递给TForm.ScreenToClient()。

Mouse.CursorPos在屏幕坐标系中返回。 TForm.ScreenToClient()将点转换为表单的客户端坐标系。

事实上，所有TControl后代都提供ScreenToClient()方法，以及它的逆ClientToScreen()，用于在坐标系之间进行转换。