Форум: "WinAPI";
Текущий архив: 2004.03.09;
Скачать: [xml.tar.bz2];
ВнизХук на ролик мышки Найти похожие ветки
← →
Pantera111 (2003-12-29 08:02) [0]Ставлю хук на вращение ролика мышки:
в Dll:
--------------------------------------------------
Function MouseHook(Code: Integer; ParamW: WPARAM; ParamL: LPARAM): LRESULT;stdcall;
Begin
If Code<0 Then
Begin
Result := CallNextHookEx(HookHandle_m, Code, ParamW, ParamL);
Exit;
End;
if paramw=WM_MOUSEWHEEL then
begin
SendMessage(ProgHandle_m, WM_MOUSEMES, Paramw, Code);
end;
Result := CallNextHookEx(HookHandle_m, Code, ParamW, ParamL);
End;
Function SetMouseHook(Wnd: HWND): BOOL; stdcall;
Begin
ProgHandle_m:=Wnd;
HookHandle_m:=SetWindowsHookEx(WH_MOUSE, @MouseHook, HInstance, 0);
End;
Function RemoveMouseHook: BOOL; stdcall;
Begin
Result:=UnhookWindowsHookEx(HookHandle_m);
End;
---------------------------------------------------------
Так вот, как мне определить в какую сторону крутился ролик? Что нужно передавать в программу. По моему это должно быть в ParamL, но в каком там виде это содержится если это там?
← →
YuRock (2003-12-29 10:22) [1]WM_MOUSEWHEEL
fwKeys = LOWORD(wParam); // key flags
zDelta = (short) HIWORD(wParam); // wheel rotation
xPos = (short) LOWORD(lParam); // horizontal position of pointer
yPos = (short) HIWORD(lParam); // vertical position of pointer
fwKeys
Value Description
MK_CONTROL Set if the CTRL key is down.
MK_LBUTTON Set if the left mouse button is down.
MK_MBUTTON Set if the middle mouse button is down.
MK_RBUTTON Set if the right mouse button is down.
MK_SHIFT Set if the SHIFT key is down.
← →
Pantera111 (2004-01-01 21:49) [2]А в win98 это работает?
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2004.03.09;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.115 c