Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Эмуляция нажатия клавиш [D6, WinXP]


RyDmi ©   (2004-05-20 23:18:00) 

Хочу сделать джойстик через 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;


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


WebErr   (2004-05-21 16:25:00) [1]

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


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

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


RyDmi   (2004-05-20 23:47:00) [3]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо