Имитация нажатия клавиши Tab в стороннем приложении (игре)

@aptos · Регистрация: 04.06.2013

Студворк — интернет-сервис помощи студентам

Проблемка вот в чем. Скорее всего я не до конца понимаю принцип работы функций, которые использую.

Простая программка, через промежутки времени жмет на кнопку:

Visual Basic
1
2
3
Private Sub Timer1_Timer()
Call keybd_event(VK_TAB, 0, 0, 0)
End Sub

Либо так тоже пробовал:

Visual Basic
1
SendKeys "{TAB}", True

Мне нужен Tab, но с другими кнопками тоже не пашет. К примеру, когда брал нолик, при запуске программка успешно записывала его в текстбоксы и ворды, либо при запуске игры - в чат.

Но вот действия, которые должны просиходить в игре при нажатии Tab или того же нолика - не происходят.
В чем пробема?

@The trick · 08.09.2014, 16:35

Сообщение от aptos

Простая программка, через промежутки времени жмет на кнопку:

А отпускать кнопку она думает?

Сообщение от aptos

Но вот действия, которые должны просиходить в игре при нажатии Tab или того же нолика - не происходят.
В чем пробема?

Возможно там стоит проверка на виртуальные нажатия.

@Good-Morning · 08.09.2014, 16:39

Сообщение от aptos

Call keybd_event(VK_TAB, 0, 0, 0)

По идее, нужно отпускать еще. Что-то типа того:

Visual Basic
1
call keybd_event(VK_TAB, 0, 2, 0)

Может, заработает.

@Pro_grammer · 08.09.2014, 17:56

Сообщение от aptos

Проблемка вот в чем.

Если игра 2D, 3D, использующая DX или OGL, то в ней нажимать при помощи keybd_event не выйдет, можно и не мучиться с нажатиями-отжатиями.
Там надо внедрятся в процесс и опрашивать и возвращать нажатия клавиатуры средствами DX или OGL, или на чем там эта игра написана.

@The trick · 08.09.2014, 18:09

Сообщение от Pro_grammer

Если игра 2D, 3D, использующая DX или OGL, то в ней нажимать при помощи keybd_event не выйдет, можно и не мучиться с нажатиями-отжатиями.
Там надо внедрятся в процесс и опрашивать и возвращать нажатия клавиатуры средствами DX или OGL, или на чем там эта игра написана.

Нет. К примеру GTA Vice city прекрасно работает с keybd_event.

@Good-Morning · 08.09.2014, 18:29

Пробовал в современной игре (думаю, не уместно говорить какой) - все спокойно эмулируется.
Ни разу не встречался со случаем, когда приложение видело разницу между эмуляцией и реальным нажатием.

@The trick · 08.09.2014, 18:29

Сообщение от Good-Morning

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

Онлайн игры.

@Good-Morning · 08.09.2014, 18:31

Сообщение от The trick

Онлайн игры.

В онлайн игре и тестил.

@The trick · 08.09.2014, 18:38

Сообщение от Good-Morning

В онлайн игре и тестил.

Сам не играю в них, слышал что не работает в некоторых играх. Если бы я делал игру - я бы сделал так, тем более это легко проверить и отфильтровать.

@aptos · 08.09.2014, 20:07 **[ТС]**

Я после того как тему создал, потом пошел и такую ерунду с кликом мыши сделал. Тоже не работало. Потом поставил задержку циклом, вроде заработало:

Visual Basic
1
2
3
4
5
6
Call mouse_event(...)
For i = 1 To 1000
 For j = 1 To 1000
 Next
 Next
Call mouse_event(...)

Что-то типо того.

А вот с нажатием непосредственно кнопок не вышло. Делал так:

Visual Basic
1
2
3
4
5
6
Call keybd_event(&H45, 0, 0, 0)
For i = 1 To 1000
 For j = 1 To 1000
 Next
Next
Call keybd_event(&H45, 0, 2, 0)

Кнопки-то жмет, а вотв игре реакции по-прежнему никакой.

Точно что-то не так делаю. Может еще какие идеи есть?

@Pro_grammer · 08.09.2014, 21:13

Сообщение от aptos

Точно что-то не так делаю. Может еще какие идеи есть?

Повторюсь для неверующих, если игра использует для ввода DirectInput, который работает напрямую с драйвером устройства, то нажатие невозможно эмитировать при помощи keybd_event или там SendMessage, PostMessage.
Для таких игр нужно использовать DirectInput, что то типа Microsoft.DirectX.DirectInput.Device(Sys temGuid.Keyboard).
На VB6 такого кода не видел, но на Си он существует

@aptos · 08.09.2014, 21:30 **[ТС]**

Сообщение от Pro_grammer

Повторюсь для неверующих, если игра использует для ввода DirectInput, который работает напрямую с драйвером устройства, то нажатие невозможно эмитировать при помощи keybd_event или там SendMessage, PostMessage.
Для таких игр нужно использовать DirectInput, что то типа Microsoft.DirectX.DirectInput.Device(Sys temGuid.Keyboard).
На VB6 такого кода не видел, но на Си он существует

Почему с устройством мышь работает, а с устройством клавиатура уже не будет?

@The trick · 08.09.2014, 21:55

Сообщение от Pro_grammer

Повторюсь для неверующих, если игра использует для ввода DirectInput, который работает напрямую с драйвером устройства, то нажатие невозможно эмитировать при помощи keybd_event или там SendMessage, PostMessage.
Для таких игр нужно использовать DirectInput, что то типа Microsoft.DirectX.DirectInput.Device(Sys temGuid.Keyboard).
На VB6 такого кода не видел, но на Си он существует

Проверил. keybd_event прекрасно работает с DirectInput (win7 x64), также прекрасно работает и SendInput.

Сообщение от aptos

Почему с устройством мышь работает, а с устройством клавиатура уже не будет?

Вторым параметром идет скэн-код, его нужно тоже заполнять, а не игнорировать.

@aptos · 08.09.2014, 22:20 **[ТС]**

А можно немножко подробнее о параметрах, или ссылочку, где почитать можно ?

Я просто брал готовую строчку из интернета, вот и не знаю для чего конкретно каждый параметр.

@The trick · 08.09.2014, 22:25

Сообщение от aptos

Я просто брал готовую строчку из интернета, вот и не знаю для чего конкретно каждый параметр.

Так нельзя делать ни в коем случае. Читай доки.
Ну по-хорошему нужно использовать SendInput, как написано в MSDN, но я объясню на примере keybd_event. Второй параметр (bScan) должен содержать аппаратный скэн-код клавиши. Получить его из виртуального кода можно функцией MapVirtualKey с параметром MAPVK_VK_TO_VSC.

@aptos · 08.09.2014, 23:15 **[ТС]**

Спасибо)

Visual Basic
1
2
3
4
UINT WINAPI MapVirtualKey(
  _In_  UINT uCode,
  _In_  UINT uMapType
);

uCode, как я понимаю, клавиша? В каком формате указывать? Вроде как тут?:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Const VK_ATTN = &HF6
Const VK_BACK = &H8
Const VK_CANCEL = &H3
Const VK_CAPITAL = &H14
Const VK_CLEAR = &HC
Const VK_CONTROL = &H11
Const VK_CRSEL = &HF7
Const VK_DECIMAL = &H6E
Const VK_DELETE = &H2E
Const VK_DOWN = &H28
Const VK_END = &H23
Const VK_EREOF = &HF9
Const VK_ESCAPE = &H1B
Const VK_EXECUTE = &H2B
Const VK_EXSEL = &HF8

@The trick · 08.09.2014, 23:19

Сообщение от aptos

uCode, как я понимаю, клавиша? В каком формате указывать? Вроде как тут?

Можно так, в VB6 уже есть встроенные константы виртуальных клавиш начинающиеся с vbKey(клавиша)

Visual Basic
1
keybd_event vbKeyX, MapVirtualKey(vbKeyX, MAPVK_VK_TO_VSC), 0, 0

@aptos · 08.09.2014, 23:27 **[ТС]**

И снова спасибо!

А можно спросить, в чем смысл скэн-кода клавиши и какое он значение имеет для эмулирования нажатия?

@The trick · 08.09.2014, 23:30

Сообщение от aptos

А можно спросить, в чем смысл скэн-кода клавиши и какое он значение имеет для эмулирования нажатия?

http://vsokovikov.narod.ru/New... n_code.htm

@aptos · 08.09.2014, 23:42 **[ТС]**

Что бы ты не объяснял, всегда получается. Спасибо

Новые блоги и статьи Все статьи Все блоги /
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .

@Good-Morning 1045 / 315 / 74 Регистрация: 13.07.2013 Сообщений: 1,270
	08.09.2014, 18:29
	Пробовал в современной игре (думаю, не уместно говорить какой) - все спокойно эмулируется. Ни разу не встречался со случаем, когда приложение видело разницу между эмуляцией и реальным нажатием. 1

@aptos 13 / 13 / 3 Регистрация: 04.06.2013 Сообщений: 156
	08.09.2014, 22:20 [ТС]
	А можно немножко подробнее о параметрах, или ссылочку, где почитать можно ? Я просто брал готовую строчку из интернета, вот и не знаю для чего конкретно каждый параметр. 0

@aptos 13 / 13 / 3 Регистрация: 04.06.2013 Сообщений: 156
	08.09.2014, 23:27 [ТС]
	И снова спасибо! А можно спросить, в чем смысл скэн-кода клавиши и какое он значение имеет для эмулирования нажатия? 0

@aptos 13 / 13 / 3 Регистрация: 04.06.2013 Сообщений: 156
	08.09.2014, 23:42 [ТС]
	Что бы ты не объяснял, всегда получается. Спасибо 0

Имитация нажатия клавиши Tab в стороннем приложении (игре)

Решение