マウス・カーソルの位置を取得・設定するには？

.NET TIPS

マウス・カーソルの位置を取得・設定するには？

デジタルアドバンテージ　一色政彦
2005/11/18

　主にWindowsアプリケーションでは、マウス・カーソルの位置を調べてから何らかの処理を実行したい場合がある。例えば、クリックされた場所に対して何らかの描画をしたり、その場所に小さなウィンドウを表示したりしたいような場合だ。

　このような場合で、実際にカーソルの現在の位置を取得・設定するには、基本的にCursorクラス（System.Windows.Forms名前空間）のPositionプロパティを利用すればよい。またカーソル位置の取得のみでよければ、Controlクラス（System.Windows.Forms名前空間）のMousePositionプロパティも利用できる。

　これらはいずれも静的なプロパティで、データ型はPoint型（System.Drawing名前空間）である。なおPoint型のXプロパティを利用することでX座標軸の位置を、またYプロパティを使用することでY座標軸の位置を取得できる。

　次の画面は、これらのプロパティを利用して作成したWindowsアプリケーションである。

　このアプリケーションは、10ミリ秒ごとにマウス・カーソルの現在位置を取得して、フォームの上部に配置したLabelコントロールに現在位置の情報を文字列化して表示する。また、［カーソルを画面中央に移動］ボタン（button1コントロール）をクリックすると、マウス・カーソルがプライマリ・スクリーン中央に移動する仕様になっている（なおプライマリ・スクリーンとは、コンピュータに複数のディスプレイが接続されている場合、そのメインとなるディスプレイのこと。ディスプレイが1つしか接続されていない場合は、そのディスプレイがプライマリ・スクリーンである）。

　なお、10ミリ秒ごとに処理を実行する方法の詳細は「TIPS：タイマにより一定時間間隔で処理を行うには？（Windowsタイマ編）」を参考に、またスクリーン中央の位置を取得する方法については「TIPS：ディスプレイの解像度を取得するには？」を参照していただきたい。

　以下はカーソルの位置を取得・設定している部分のソース・コードである。なおソース・コード全体は、このサンプル・プログラムの説明欄のリンク（下の「C#版のダウンロード」「VB.NET版のダウンロード」）からダウンロードできる。

private void timer1_Tick(object sender, System.EventArgs e)

{

  // マウス・カーソルの現在位置を

  // 10ミリ秒ごとに取得してラベルに設定

  label1.Text = Control.MousePosition.ToString();

   // Cursorクラスでも取得可能

  //label1.Text = Cursor.Position.ToString();

}

private void button1_Click(object sender, System.EventArgs e)


{

  // ボタンがクリックされたときに

  // マウス・カーソルの位置をスクリーン中央に移動させる

  int centerX = Screen.PrimaryScreen.Bounds.Right / 2;

  int centerY = Screen.PrimaryScreen.Bounds.Bottom / 2;

  Cursor.Position = new Point(centerX, centerY);

}

Private Sub timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles timer1.Tick

  ' マウス・カーソルの現在位置を

  ' 10ミリ秒ごとに取得してラベルに設定

  label1.Text = Control.MousePosition.ToString()

   ' Cursorクラスでも取得可能

  'label1.Text = Cursor.Position.ToString()

End Sub

Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click


  ' ボタンがクリックされたときに

  ' マウス・カーソルの位置をスクリーン中央に移動させる

  Dim centerX As Integer = Screen.PrimaryScreen.Bounds.Right / 2

  Dim centerY As Integer = Screen.PrimaryScreen.Bounds.Bottom / 2

  Cursor.Position = New Point(centerX, centerY)

End Sub

マウス・カーソルの取得・設定を行うサンプル・プログラム（上：C#、下：VB.NET）

　マウス・カーソルの位置情報を実際に活用する際には注意する点が1つある。先に示したサンプル・プログラムの実行結果を見て分かるように、マウス・カーソルの位置情報はスクリーン全体における位置（スクリーン座標）として取得される。しかしWindowsアプリケーションの基本的な座標計算は、自分自身の領域（クライアント領域）における位置（クライアント座標）を基準に計算する。

　従って、例えばマウス・カーソルの位置がフォーム内のどこにあるのかを調べるには、その位置をいったんスクリーン座標からクライアント座標に変換する必要があるのだ。この座標変換の方法については「TIPS：スクリーン座標←→クライアント座標の変換を行うには？」で紹介している。

TechTargetジャパン

Insider.NET 記事ランキング

本日月間

マウス・カーソルの位置を取得・設定するには？ - ＠IT