■画面上のマウスカーソルの座標を取得
Windows APIのgetCursorPos()を使います。
var nowPos TPoint; //TPoint型変数宣言 begin getCurosorPos(nowPos); //画面上のマウスカーソルの座標を取得 showMessage('X座標:' + IntToStr(nowPos.X) + ' Y座標:' + IntToStr(nowPos.Y)); end;
Windows APIのgetCursorPos()を使います。
var nowPos TPoint; //TPoint型変数宣言 begin getCurosorPos(nowPos); //画面上のマウスカーソルの座標を取得 showMessage('X座標:' + IntToStr(nowPos.X) + ' Y座標:' + IntToStr(nowPos.Y)); end;