Delphi - 通过WinAPI GetCursorPos实现鼠标位置的实时显示

通过WinAPI GetCursorPos实现鼠标位置的实时显示 有时候我们需要将鼠标的位置实时抓取出来，可以通过如下方式实现。 添加一个Timer控件，执行间隔改为100ms，双击控件输入如下代码： 1 var 2 P: TPoint; 3 begin 4 GetCursorPos(P); 5 RzLabel_Point.Caption := Format('(%d,%d)',

>>阅读原文<<