Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.11.02;
Скачать: CL | DM;

Вниз

Не получается правильно поставить Hook на нажатие клавиши...   Найти похожие ветки 

 
@!!ex ©   (2008-09-24 15:13) [0]

library nw;
uses Windows, Messages;

var
 SH:HHOOK;

function MsgProc(code:DWORD;wParam,lparam:DWORD):DWORD;stdcall;
begin
   MessageBox(0,PChar(chr(wParam)),"",0);
 CallNextHookEx(SH,code,wParam,lparam);
end;

begin
 SH:=SetWindowsHookEx(WH_KEYBOARD,@MsgProc,0,GetCurrentThread());
end.

Задача в том, чтобы ловить нажатия клавиш и вместо указанных клавиш пересылать свои. Например, если пользователь нажал L прога должна думать, что нажали F и так далее...
как сделать? и почему не работает мой хук?


 
Palladin ©   (2008-09-24 15:21) [1]

SetWindowsHookEx(WH_KEYBOARD,@MsgProc,HInstance,0);


 
vegarulez ©   (2008-09-24 17:37) [2]

http://delphimaster.net/view/2-1222147865/


 
Palladin ©   (2008-09-24 17:51) [3]

и что? при чем здесь твои хоткеи? там хуками и не пахнет


 
Leonid Troyanovsky ©   (2008-09-24 19:47) [4]


> @!!ex ©   (24.09.08 15:13)  

> begin
>  SH:=SetWindowsHookEx(WH_KEYBOARD,@MsgProc,0,GetCurrentThread());
> end.

Поубивал бы.

> Palladin ©   (24.09.08 15:21) [1]

> SetWindowsHookEx(WH_KEYBOARD,@MsgProc,HInstance,0);

А ты добрый :)

--
Regards, LVT.


 
Palladin ©   (2008-09-24 21:53) [5]

тока када выпью! :)



Страницы: 1 вся ветка

Текущий архив: 2008.11.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
1-1201615785
webpauk
2008-01-29 17:09
2008.11.02
Прозрачность окна


15-1221061690
Tricky_
2008-09-10 19:48
2008.11.02
Удаленная работа, или как заставить программиста работать


15-1221060690
keymaster
2008-09-10 19:31
2008.11.02
как избавиться от хинта?


2-1222028467
programmer90
2008-09-22 00:21
2008.11.02
Проблема с маской


2-1222216922
Lamer6666
2008-09-24 04:42
2008.11.02
Zeos+MySQL