[HunteRus]

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

Не работающие в контре методы:
1) Контра не реагирует на такие нажатия

Код:

procedure SimulateKeystroke(Key : byte; extra : DWORD);
begin
    keybd_event(Key,extra,0,0);
    keybd_event(Key,extra,KEYEVENTF_KEYUP,0);
end;

procedure SimulateKeyDown(Key : byte; extra : DWORD);
begin
    keybd_event(Key,0,0,0);
end;

procedure SimulateKeyUp(Key : byte; extra : DWORD);
begin
    keybd_event(Key,0,KEYEVENTF_KEYUP,0);
end;

2) И на отправку месаджа тоже

Код:

  sendMessage(handle, WM_KEYDOWN, 65, 0); //На это не реагирует
  sendMessage(handle, WM_CLOSE, 65, 0); //А тут реагирует(закрывается)

[foka2000]

Мышью не мало,а достаточно. Полноценно используйте мышь.

[HunteRus]

Мало, т.к. мне и для распрыга надо и двигаться вперед/назад - не хватает ((( я юзаю все кнопки на мыши и колесо

[einstein]

а алиасами что мешает сделать?

[GriLab]

У меня такая же история, но только с Grand Theft Auto: Vice City Deluxe: писал программу, которая при нажатии горячей клавиши вводит в игре чит-код.

[ApxaHGe1]

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

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

Не работающие в контре методы:
1) Контра не реагирует на такие нажатия

Код:

procedure SimulateKeystroke(Key : byte; extra : DWORD);
begin
    keybd_event(Key,extra,0,0);
    keybd_event(Key,extra,KEYEVENTF_KEYUP,0);
end;

procedure SimulateKeyDown(Key : byte; extra : DWORD);
begin
    keybd_event(Key,0,0,0);
end;

procedure SimulateKeyUp(Key : byte; extra : DWORD);
begin
    keybd_event(Key,0,KEYEVENTF_KEYUP,0);
end;

2) И на отправку месаджа тоже

Код:

  sendMessage(handle, WM_KEYDOWN, 65, 0); //На это не реагирует
  sendMessage(handle, WM_CLOSE, 65, 0); //А тут реагирует(закрывается)

попробуй

Код:

var
Layout    : array [0..KL_NAMELENGTH] of Char;

  if Layout <> '00000409' then
  begin
    LoadKeyboardLayout('00000409', klf_activate);                 
    ActivateKeyboardLayout(LoadKeyboardLayout('00000409', 0), 0);
  end;

Тут мы раскладку клавиатуры  меняли на ENG
keybd_event(VK_SPACE,0,0,0);
Sleep(10);
keybd_event(VK_SPACE,0,KEYEVENTF_KEYUP,0);

[Pyro]

я тоже для гта писал чтобы читы случайные вводила(keybd_event), потом переделал для samp-а - как удобную альтернативу auto-hotkey, если нада выложу

[GriLab]

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

я тоже для гта писал чтобы читы случайные вводила(keybd_event), потом переделал для samp-а - как удобную альтернативу auto-hotkey, если нада выложу

Будь добр! Поделись.

[Pyro]

там если добавляешь в список надо Active перевключить, чтобы новые хоткеи зарегились, и изменеения нет только удалить/добавить в остальном все должно работать как ожидается
и на сколько поню в коде небольшой хаос многое можно поудалять

[GriLab]

Pyro, спасибо. Буду разбираться.

[Pyro]

GriLab Незачто, если бы я её продолжал доделывать для себя, то для юзерфрендли убрал бы чекбокс Active, а событие с него переназначил на FormAcrivate/Deactivate

[Страдалецъ]

Бессмысленная и вредная прога. Вы получите преимущество перед другими игроками нечестным путем. Вам бы понравилось, если бы противник игнорировал все ваши повреждения и перемещался мгновенно в любую точку зоны?