ページ 11

プログラムからマウスカーソルを動かしたい

Posted: 2006年12月15日(金) 16:33
by くまくん
質問は表題の通り、プログラムからマウスカーソルを動かしたい、
ということなのですが、ネットで探したら
http://www.geocities.jp/ky_webid/win32c/007.html
の最後の部分に
「テキストファイルから移動情報を読み取って、自動的にマウスカーソルを
動かすプログラムを作ってみて下さい。 」
というのがありましたが、答えが書いてありません。
どなたか教えて頂けないでしょうか。

Re: プログラムからマウスカーソルを動かしたい

Posted: 2006年12月15日(金) 18:04
by 7
> 質問は表題の通り、プログラムからマウスカーソルを動かしたい、
> どなたか教えて頂けないでしょうか。
マウスカーソルを動かしたいなら、mouse_event()関数・SetCursorPos()関数などがあります。それらの説明はインターネットに任せてMoveCursorPosという関数を作ってみました。

コード: 全て選択

Sub MoveCursorPos(ByVal moveX As DWord,ByVal moveY As DWord)
	mouse_event(MOUSEEVENTF_MOVE,moveX,moveY,0,0)
End Sub

' マウスカーソルを左上に10ミッキー移動させる
MoveCursorPos(-10,-10)

Re: プログラムからマウスカーソルを動かしたい

Posted: 2006年12月15日(金) 18:13
by ゲスト
ありがとうございます! SetCursorPos()関数があることを知りませんでした。

> マウスカーソルを動かしたいなら、mouse_event()関数・SetCursorPos()関数などがあります。それらの説明はインターネットに任せてMoveCursorPosという関数を作ってみました。

コード: 全て選択

Sub MoveCursorPos(ByVal moveX As DWord,ByVal moveY As DWord)
 	mouse_event(MOUSEEVENTF_MOVE,moveX,moveY,0,0)
 End Sub
 
 ' マウスカーソルを左上に10ミッキー移動させる
 MoveCursorPos(-10,-10)