Hi,
My app is all hand code, so I would be dissecting a sample app, correct?
Ive got a hook working(15 seconds of really good testing…) now that disables the wheel for the entire app.
Will the template show me something better?
myMouseHook procedure(long ncode, long wparam, long lparam),pascal, long
...
api_CallNextHookEx(Long,Long,Long,Long),Long,Raw,Pascal,NAME('CallNextHookEx')
api_SetWindowsHookEx(Long,Long,Long,Long),Long,Raw,Pascal,Name('SetWindowsHookExA')
...
CODE
open(AppFrame)
ACCEPT
if (firstrun)
api_SetWindowsHookEx(14, address(myMouseHook), 0, 0)
! first parameter = WH_MOUSE_LL = 14 = Installs a hook procedure that monitors low-level mouse input events. For more information, see the LowLevelMouseProc hook procedure.
! 2nd parameter = address(myMouseHook)
! 3rd null HINSTANCE
! 4th 0 threadid
...
myMouseHook procedure(long ncode, long wparam, long lparam)
hMouse long (0)
code
! per https://docs.microsoft.com/en-us/windows/desktop/api/winuser/nf-winuser-callnexthookex
! hMouse is ignored
if (ncode >= 0) and (wparam = WM_MOUSEWHEEL)
return 1
else
return api_CallNextHookEx(hMouse, ncode, wParam, lparam)
end