掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
マウスのx方向、y方向の移動量dx、dyを検知して操作するには？ (ID：28044)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
> GetCursorPos()関数は、紹介していただいたHPを参照して、フォーム上なら取得できるとわかりましたが、フォーム上に無いときに取得できなくて困っていました。 Mouse.CursorPosでも同じことですが，「フォーム上に無いとき」でも取得はできます。 例えば procedure TForm1.Timer1Timer(Sender: TObject); var P: TPoint; begin GetCursorPos(P);//TPoint型の変数Pにマウスの座標を格納 label1.Caption :='マウスの座標は'+#10#13+ 'デスクトップ上では X:'+ inttostr(P.X)+',Y:'+inttostr(P.Y); P :=ScreentoClient(P); label1.Caption :=label1.Caption+#10#13+'フォーム上では X:'+ inttostr(P.X)+',Y:'+inttostr(P.Y)+'です。'; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.