Can anyone confirm? (Win 10 x64, PB 5.73 LTS)
Code: Select all
Procedure MouseHook(nCode, wParam, lParam)
Select wParam
Case #WM_LBUTTONDOWN
AddGadgetItem(1, -1, "Left Mouse Clicked " + Date())
EndSelect
ProcedureReturn CallNextHookEx_(0, nCode, wParam, lParam)
EndProcedure
OpenWindow(0, 0, 0, 240, 320, "Mouse Hook", #PB_Window_MinimizeGadget | #PB_Window_ScreenCentered)
EditorGadget(1, 10, 10, 180, 200)
StringGadget(0, 10, 230, 180, 20, "") : SetActiveGadget(0)
hhkLLMouse = SetWindowsHookEx_(#WH_MOUSE_LL, @MouseHook(), GetModuleHandle_(0), 0)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow