Вниз
Скачать: CL | DM;

Помогите с хуками...   Найти похожие ветки 

 
progger ©   (2002-10-10 12:19) [0]

Ув. знатоки, подскажите пожалуйста как с помощью хука блокировать нажатие кнопок мыши для всех процессов, и как отменить этот запрет, не выгружая хук. Заранее благодаре, и если можно, то хотелось бы получить часть кода программы решающую данный вопрос.


 
Song ©   (2002-10-10 12:43) [1]

Нужно в CallBack ф-ии хука сделать двойное условие. Первое например на HC_ACTION а второе на что-то, что если будет то тогда вызывается активация, ну например какое-либо окно в системе.


 
progger ©   (2002-10-10 13:03) [2]

С помощью этой процедуры в своей библиотеке я отлавливаю нажатие правой клавиши. Так где и какой оператор мне поставить, чтобы нажатие кнопки до приложения не дошло?
function SysMsgProc(code : integer; wParam : word; lParam : longint) : longint; stdcall;
begin
if code = HC_ACTION then
begin
{Проверяю, нажата ли правая кнопка мыши}
if TMsg(Pointer(lParam)^).message = WM_RBUTTONDOWN then begin

{Вывожу сообщение при удачной работе.}
MessageBox(0, "HOOK1 working !", "Message from Exampel2/Process1", 0); end;
end;
{Пытаемся передать сообщение дальше по цепочке hook-ов. }
Result:= CallNextHookEx(GlobalData^.SysHook, Code, wParam, lParam);
end;


 
Song ©   (2002-10-10 13:43) [3]

Вернуть TMessage(TMsg(Pointer(lParam)^).Message).Result не успешный или подменить сообщение на WM_NULL или не вызывать CallNextHookEx()



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
1-69278
Azbul
2002-11-11 14:45
2002.11.21
народ помогине с blockread


14-69549
alvan
2002-11-02 11:03
2002.11.21
Файлы *.doc


1-69389
kull
2002-11-10 12:56
2002.11.21
Кто с объектами Word-a работал?


1-69240
Александр
2002-11-11 16:07
2002.11.21
обучение (курсы) Delphi


4-69630
vidiv
2002-10-10 09:23
2002.11.21
SelectDirectory( Caption , ?????? ,dir); - ??????? - Для сети




   Наверх