Эмуляция нажатия клавиш

← →
RyDmi (2004-05-20 23:18) [0]

Хочу сделать джойстик через LPT и необходимо написать прогу, которая бы обрабатывала клавиши управления: VK_UP, VKDOWN и т.д. Мне нужно эмулировать нажатие этих клавиш в играх, т.е. я нажимаю на джойстике например кнопку вправо, а прога эмулирует нажатие VK_RIGHT. Как осуществить? Пробовал через keyb_event(...) - не помогает. Посылал WM_KEYDOWN - тоже! Возможно я что-то не так делаю? Вот пример:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
keybd_event(VK_Right,VK_right,0,0);
end;

и другой:

procedure TForm1.Timer1Timer(Sender: TObject);
var H:HWND;
begin
h:=GetForegroundWindow;
sendmessage(H,WM_KEYDOWN,VK_right,5);
end;

Очень прошу помочь!

← →
RyDmi (2004-05-20 23:47) [1]

Дело в том, что в приложениях всё работает, а в играх - нет. Как поступить?

← →
RyDmi (2004-05-21 16:11) [2]

Люди, ну помогите кто - нибудь! PLEASE!

А с чего ты взял, что посылаешь сообщение НУЖНОМУ окну? :))))

Эмуляция нажатия клавиш Найти похожие ветки