Как программно прокрутить колесико мыши?

← →
Chaser © (2006-02-14 10:56) [0]

Требуется программно из моего приложения прокрутить колесико мыши в другом приложении, т.е. чтобы допустим в MS Word двигался не курсор, а вертикальная полоса прокрутки.

Событие на своей форме обрабатываю как OnMouseWheel, а вот как послать сообщение любому другому приложению не имею понятия.

Думаю нужно послать что-то типа:

keybd_event(vk_up, 0, 0, 0);
keybd_event(vk_up, 0, KEYEVENTF_KEYUP, 0);

но для колеса мыши.

Как это сделать?

← →
Anatoly Podgoretsky © (2006-02-14 10:59) [1]

Робот нужен

← →
Курдль © (2006-02-14 11:54) [2]

> Как программно прокрутить колесико мыши?

Хочешь научить ее ездить? 8-()

← →
Yanis © (2006-02-14 12:15) [3]

> Думаю нужно послать что-то типа:
>
> keybd_event(vk_up, 0, 0, 0);
> keybd_event(vk_up, 0, KEYEVENTF_KEYUP, 0);
>
> но для колеса мыши.

Думаю, что mouse_event в этом случае тебе больше подойдёт.

← →
Chaser © (2006-02-14 12:57) [4]

Нашел, но работает не до конца:

Если крутить колесо вверх:

Mouse_Event(MOUSEEVENTF_WHEEL, 0, 0, 120, 0), то все ОК, полоса прокрутки идет вверх.

Но вниз не получается:

Mouse_Event(MOUSEEVENTF_WHEEL, 0, 0, -120, 0);

В MSDN написано:

A positive value indicates that the wheel was rotated forward, away from the user; a negative value indicates that the wheel was rotated backward, toward the user. One wheel click is defined as WHEEL_DELTA, which is 120.

Но отрицательное значение не катит.
При -120 пишет что не тот формат, какое значание нужно поставить?

mouse_event(MOUSEEVENTF_WHEEL,Mouse.CursorPos.X, Mouse.CursorPos.Y, DWORD(-120), 0);

Спасибо, теперь заработало!

Как программно прокрутить колесико мыши? Найти похожие ветки