Переназначение клавиши. Delphi.

[Dragon54]

Всем привет =)

Делать было нечего... и решил написать программку, но не получилось...

В общем, необходимо что бы при зажатой клавише (V или ALT) эмулировалось нажатие пробела с заданной частотой.

Вроде легко, но надо чтобы нажатие клавиши перехватывалось при запущенной игре. Наверное это придется делать в dll, но я, мягко говоря, мало чего понимаю в их написании... Так что все мои попытки написания dll'ки не увенчались успехом.

Вот что собственно надо сделать, только глобально, так как при запущенной игре прога не работает.

var
  Form1: TForm1;

 implementation

{$R *.dfm}

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if getasynckeystate($56)<>0 then
Timer2.Enabled:=true
else
Timer2.Enabled:=False;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Timer2.Enabled:=False;
end;

procedure TForm1.Timer2Timer(Sender: TObject);
begin
keybd_event($20, 0, 0, 0);
keybd_event($20, 0, KEYEVENTF_KEYUP, 0);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Timer2.Interval:=StrToInt(Edit1.Text);
end;

end.

Ваши советы?!)

[Lime]

 private
    { Private declarations }
  procedure WMHotKey(var Mess:TWMHotKey);message WM_HOTKEY;

procedure TForm1.WMHotKey(var Mess: TWMHotKey);
begin
//Твои действия
end;

RegisterHotKey(Handle, 1 ,0, vk_F7);//F7 //В создании формы

UnregisterHotKey(Handle, 1);//При закрытии программы

[Dragon54]

Ну это работает тоже только в пределах программы.

Такс, раз не совсем понятно что хочу сделать, приведу игровой пример:
В игре при зажатом пробеле выполняется полезное действие, но всего 10 секунд, если пробел нажать-отпустить-нажать-отпустить, то можно немного продлить это время, но постоянно долбить пробел не очень хочется, вот я и пытаюсь повесить эту функцию на другую клавишу.
Но что-то мне подсказыват что для этого надо копаться в файлах самой игры....

[Lime]

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

Ну это работает тоже только в пределах программы.

Вполне хорошо работает вне программы. Главное грамотно убрать .
Я так сделал программу скринер.
Так-же делал скриншоты в игре используя данный метод.

[Dragon54]

хм =/
главное грамотно убрать что?..

[Lime]

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

хм =/
главное грамотно убрать что?..

После себя

UnregisterHotKey

Изза этой прелести , иногда после повторного запуска не пашет.

[stiv73]

Пиши в асю 402114052