[DungeonLords]

Привет всем!

Программа внизу должна открывать консоль в CSS и нажимать клавишу "верхняя стрелка". Вопрос: почему этого не происходит?

И дополнитльный вопрос: как мне эмулировать нажатие Enter? В таблице кодов написано 1C, но когда я так пишу вылезает ошибка.

Код:

procedure TForm1.AsyncTimer1Timer(Sender: TObject);
begin
if (iskeydown('G')) or (iskeydown('g')) or (iskeydown('п')) or (iskeydown('П'))  then
 begin
 keybd_event(96,0,0,0);   //241
 keybd_event(96,0,KEYEVENTF_KEYUP,0);

 {!}
 keybd_event(48,0,0,0);
 keybd_event(48,0,KEYEVENTF_KEYUP,0);

  {ENTER}
  keybd_event(65,0,0,0);
 keybd_event(65,0,KEYEVENTF_KEYUP,0);
 end;

В ручном режиме всё работает.

[DungeonLords]

Никто не знает что-ли? Помогите!

[Drozh]

Код:

 
// вверх
 keybd_event(VK_UP, 0, 0, 0);
 keybd_event(VK_UP, 0, KEYEVENTF_KEYUP, 0);
// Enter
 keybd_event(VK_RETURN, 0, 0, 0);
 keybd_event(VK_RETURN, 0, KEYEVENTF_KEYUP, 0);

[DungeonLords]

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

Код:

 
// вверх
 keybd_event(VK_UP, 0, 0, 0);
 keybd_event(VK_UP, 0, KEYEVENTF_KEYUP, 0);
// Enter
 keybd_event(VK_RETURN, 0, 0, 0);
 keybd_event(VK_RETURN, 0, KEYEVENTF_KEYUP, 0);

Спасибо. Последний вопрос: как эмулировать нажатие "!" и кнопки ё (конслои).