//声明:GetCursorPos( var lpPoint: TPoint {POINT 结构指针, 接收鼠标指针的屏幕坐标}): BOOL; //举例:var pt: TPoint;begin GetCursorPos(pt); ShowMessage(Format('ScreenX: %d; ScreenY: %d', [pt.X, pt.Y]));end; 本文共 241 字，大约阅读时间需要 1 分钟。
//声明:GetCursorPos( var lpPoint: TPoint {POINT 结构指针, 接收鼠标指针的屏幕坐标}): BOOL; //举例:var pt: TPoint;begin GetCursorPos(pt); ShowMessage(Format('ScreenX: %d; ScreenY: %d', [pt.X, pt.Y]));end; 转载于:https://my.oschina.net/hermer/blog/320442