Глобальный хук WH_MOUSE

← →
fdooch (2007-07-30 20:34) [0]

Возникла проблема по работе с глобальными хуками. При выполнении нижеприведённого примера в Windows XP с включенными визуальными стилями мышь "зависает" при нажатиях на кнопках в заголовке окна (свернуть, минимизировать, закрыть). При выполнении аналогичных операций через контекстное системное меню или с помощью горячих клавиш (Alt+F4) задержки не возникает. В других ОС (Win2k, Vista) и в той же XP с выключенными визуальными стилями проблема отсутствует.

В чём заключается проблема и как её можно решить?

var Hook: HHOOK; function HookProc(Code: Integer; wParam: WPARAM; lParam: LPARAM): Longint; stdcall; begin if (Code=HC_ACTION) and ((wParam=WM_RBUTTONDOWN) or (wParam=WM_RBUTTONUP)) then begin if wParam=WM_RBUTTONUP then Windows.Beep(100, 100); Result:=HC_SKIP; Exit end else Result:=CallNextHookEx(Hook, Code, wParam, lParam) end; procedure TForm1.FormCreate(Sender: TObject); const WH_MOUSE_LL = 14; begin Hook:=SetWindowsHookEx(WH_MOUSE_LL, @HookProc, HInstance, 0) end; procedure TForm1.FormDestroy(Sender: TObject); begin UnhookWindowsHookEx(Hook) end;

← →
Yanis © (2007-07-30 22:30) [1]

Есть такая проблемка. А если в dll реализовать, то баг сохраняется?

← →
fdooch (2007-07-31 11:40) [2]

При реализации хука в dll проблема осталась. Да и вообще, использование dll нежелательно. Переделал исходный код - использую хук в отдельном потоке. Все работает на ура. Кстати, в MSDN написано:

LowLevelMouseProc Function

LRESULT CALLBACK LowLevelMouseProc(int nCode, WPARAM wParam, LPARAM lParam);

nCode
[in] Specifies a code the hook procedure uses to determine how to process the message. If nCode is less than zero, the hook procedure must pass the message to the CallNextHookEx function without further processing and should return the value returned by CallNextHookEx. This parameter can be one of the following values.
HC_ACTION
The wParam and lParam parameters contain information about a mouse message.
wParam
[in] Specifies the identifier of the mouse message. This parameter can be one of the following messages: WM_LBUTTONDOWN, WM_LBUTTONUP, WM_MOUSEMOVE, WM_MOUSEWHEEL, WM_RBUTTONDOWN, or WM_RBUTTONUP.
lParam
[in] Pointer to an MSLLHOOKSTRUCT structure.

У меня (в Windows XP SP2)в параметре wParam (в отличие от утверждения MSDN) передаётся ещё и сообщения от средней и дополнительных клавишей мыши (WM_MBUTTONDOWN, WM_MBUTTONUP, WM_XBUTTONDOWN, WM_XBUTTONUP), что и необходимо для моего приложения. Кто-нибудь в курсе, подобное поведение сохраняется в Win2K? В Vista всё отлично - проверял.

Глобальный хук WH_MOUSE_LL Найти похожие ветки