Отправка нажатий клавиш, с помошью PostMessage

idealser

Доброе время суток!
Мне необходимо послать нажатия клавиш в игру, непосредственно, основному окну. Хендл окна есть, сообщения отправляю через PostMessage. keybd_event не подходит, так как мне необходимо послать нажатия в неактивное окно.

Через Spy++ я просмотрел получаемые сообщения окном и взял оттуда параметры wParam и lParam. Таким образом, нажатие клавиши "1" у меня осуществляется так:

Код Delphi
1 2   PostMessage(wnd, WM_KEYDOWN, $00000031,$00020001 );   PostMessage(wnd, WM_KEYUP,   $00000031,$C0020001 );

Но при выполнении данной части кода, а точнее, при выполнении WM_KEYUP, у меня выходит Range check Error и ругается он на значение $C0020001. Я всячески пробовал подругому послать нажатие, но, тем не менее, все попытки были неудачными. Сообщения в Spy++, идентичны, за исключением WM_KEYUP и того, что у меня вместо одного WM_CHAR их два: по одному после нажатия и отжатия клавиши. Но тогда я использовал для отжатия параметры $00000031,$C0020001. Так должно быть? То есть, после отжатия тоже должен генерироваться WM_CHAR?

Ну и при "натуральном" нажатии клавиш сообщения выстраиваются в таком порядке:
WM_KEYDOWN, WM_CHAR, WM_KEYUP

Мой был таков:
WM_KEYDOWN, WM_KEYUP, WM_CHAR, WM_CHAR


Заранее благодарю.

CodeMonkey

Код Delphi
1 PostMessage(wnd, WM_KEYUP,   $00000031,Integer($C0020001));

idealser

Спасибо, ошибка исчезла, в Spy все точно также, как и при обычном нажатии, но... Никакого эффекта, я уже и не знаю как реализовать это нажатие клавиши

CodeMonkey

http://www.transl-gunsmoker.ru/2010/06/postmessage.html

Добавлено через 1 минуту
P.S. Есть подозрение, что игра может читать ввод через DirectInput. Есть сомнения, что даже SendInput поможет с этим.

idealser

Загвоздка в том, что игра читает такие клавиши, как: Enter, F1, F2, F3, Backspace... Причем принимает она их лишь отсылкой сообщения WM_CHAR. И плюс, есть программы, которые эмулируют нажатия именно в этой игре, так что это возможно. Сейчас почитаю про SendInput, попробую что-нибудь.

Добавлено через 27 минут
А разве SendInput работает с неактивными окнами? Мне нужно послать событие именно туда

anonimus

idealser, дай ссылочку на Spy++

idealser

[Запрещённое содержимое - удалено.]

	Комментарий модератора Mawrat
	Idealser, запрещено в общий доступ такое содержимое выкладывать.

idealser

Подсказали использовать оконные процедуры

Код Delphi
1 2 3 4 5 6 7 8 9 procedure KeyDown (VK : Byte); var wndold : DWORD; begin wndold :=  GetWindowLongPtr(Wnd,GWL_WNDPROC); // первый способ получить WNDPROC wndold :=  GetClassLong(Wnd,GCL_WNDPROC);  // второй способ получить WNDPROC CallWindowProc (Pointer(wndold), Wnd, WM_KEYDOWN, $00000031,$00020001); CallWindowProc (Pointer(wndold), Wnd, WM_KEYUP, $00000031,Integer($C0020001)); end;

1. Здесь возвращаемое значение равно нулю. GetLastError показывает 5: Отказано в доступе.
2. Во втором случае я получаю адрес процедуры класса, но SPY++ показал, что он отличен от оконного адреса процедуры. Наверное поэтому и игнорируются сообщения, они даже не доходят до окна.

У кого-нибудь есть предположения, как можно получить адрес оконной процедуры?

Добавлено через 1 час 21 минуту
Иногда, при использовании второго метода вылезает ошибка Privileged Instruction при вызове CallWindowProc.

Uzur123

На сколько я понял, требуется отправить сочетание клавиш неактивному окну, при том что отправка нажатий одиночных кливиш срабатывает.

А вы не пробывали отправлять команды сделующим образом ?

отправка нажатия кнопки 1
задержка 200 миллисекунд
отправка нажатия кнопки 2
задержка 200 миллисекунд
отправка отжатия кнопки 2
задержка 200 миллисекунд
отправка отжатия кнопки 1


Так как я вижу что автор в первом примере пробует сделать так:

отправка нажатия кнопок 1 2
отжатие кнопок 1 2
(ни задержек ни порядка свёрнутое приложение может просто не распознать)


извиняюсь что не предоставляю программного кода, так как не знаком с синтаксисом этих команд, да и проверить в данный момент негде.