How can I get cursor position on the form?

I开发者_运维问答 need to get cursor position on the form, how would I do that?

---

Pass Mouse.CursorPos to TForm.ScreenToClient().

Mouse.CursorPos is returned in the screen coordinate system. TForm.ScreenToClient() converts points into the form's client coordinate system.

In fact all TControl descendants offer the ScreenToClient() method, and its inverse, ClientToScreen(), to convert between coordinate systems.