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

Вниз

Блокировка клавы с помошью хука   Найти похожие ветки 

 
neodiX ©   (2003-04-17 17:17) [0]

Все блокируеться, кроме ALT+TAB, WIN key (left or right) ну и так же ALT+ESC. Дело в том, что вроде вот так (см. ниже)должно блокировать, покрайней мере так в инете написано, но нифига, в чем проблема?
{Маппинг файла и все остальное реализовано как всегда }
function KBD_HookProc(nCode: Integer; iWPARAM: wParam; iLPARAM: lParam): LResult; stdcall; far;
var
ReturnStructure: PMSG;
begin
if ncode<0 then
CallNextHookEx(0, nCode, iwParam, ilParam)
else
result:=1;

end;
procedure UnLockMouse;
begin
UnHookWindowsHookEx(rHookRec^.HookID_Mouse);
end;

procedure LockKBD;
begin
rHookRec^.HookID_KBD := SetWindowsHookEx(WH_KEYBOARD, @KBD_HookProc, hInstance, 0);
end;
procedure UnLockKBD;
begin
UnHookWindowsHookEx(rHookRec^.HookID_KBD);
end;


 
Song ©   (2003-04-17 19:42) [1]

Нужен низкоуровневый хук - WH_KEYBOARD_LL


 
neodiX ©   (2003-04-17 23:05) [2]

Song, это то, что надо! Только наверно надо какой то модуль в uses прописать, что бы компилятор понял WH_KEYBOARD_LL, а то ругается, не распознает :(


 
ИгорьОк   (2003-04-18 04:40) [3]

А обязательно так извращаться? Можно ведь просто использовать BlockInput, блокирует всё и полностью (даже мышь) на NT помогает только Reset, в смысле если не программно, а так.


 
Yuri Btr ©   (2003-04-18 09:38) [4]

JwaWinUser
из библиотеки JEDI Windows API Library


 
neodiX ©   (2003-04-18 12:05) [5]

2 ИгорьОк
Мне надо не все сразу, а по отдельности блокиворать. Сначала мышь, потом маус.
Все вопрос закрыт, я уже узнал.



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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
9-83838
=Venom=
2003-01-13 18:57
2003.06.26
Подгрузка большого количества спрайтов/тайлсов..... =(


1-84234
Совсем новичок
2003-06-08 16:25
2003.06.26
Как сделать паузу или подождать прорисовывания TLabel?


8-84452
Andrew Pavluchenkov
2003-03-13 13:16
2003.06.26
Сохранение картинок с формы в текстовый файл (как в *.dfm )


14-84617
bkv
2003-06-09 15:42
2003.06.26
Программка для сверки исходников.


7-84780
Andrey007
2003-04-17 14:52
2003.06.26
Подскажите, пожалуйста, по поводу изменения разрешения экрана.