スクリーン座標上でのmouse_eventでのマウスの動き
御世話様です。
mouse_eventコマンドを使って、スクリーン座標のドラックする範囲を選択しているのですが、選択した範囲が座標で指定した部分より広くなってしまいます。
プログラムは以下の通りです。原因わかる方がいれば
ご教授ください。よろしくお願い致します。
（開発環境 Windows2000 Visual Basic6.0)
Private Sub Command1_Click()
'ドラッグの自動化
Dim x As Long
Dim y As Long
'zahyoux(1.0):選択範囲右下のx座標
'zahyoux(0.0):選択範囲左上のx座標
'zahyoux(1.1):選択範囲右下のy座標
'zahyoux(0.1):選択範囲左上のy座標
'ドラッグする範囲（横） x = zahyoux(1, 0) - zahyoux(0, 0)
'ドラッグする範囲（縦） y = zahyoux(1, 1) - zahyoux(0, 1)
'ドラッグする始点にマウスを移動
Call SetCursorPos(zahyoux(0, 0), zahyoux(0, 1))
'マウスの左ボタンをクリック
Call mouse_event(MOUSEEVENTF_LEFTDOWN,0 ,0, 0, 0)
'左ボタンを押したまま移動
Call mouse_event(MOUSE_MOVED, ax, ay, 0, 0)
'左ボタンを上げる
Call mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0)
End Sub
お礼
ギャ！！ mouse.pos(x,y)みたいな感じかと思ったら、Cursor.Positionだったですか。 ありがとうございました。