[PB4]Mausklick hooken
Verfasst: 09.04.2006 11:17
Dieser code zeigt euch wie ihr mausklicks durch einen Systemweiten hook abfängt und verarbeitet, wenn ihr eure linke maustaste wiederhaben wollt drückt Escape 
So lassen sich natürlich auch rechte mausklicks und/oder die ganze mausbewegung abfangen!
mfg Ninja
Code: Alles auswählen
Structure llmouse
p.POINT
mouseData.w
flags.w
time.w
dwExtraInfo.w
EndStructure
Procedure.l mousehook(nCode,wParam,*p.llmouse)
If wParam = 513
Debug "Klick!"
ProcedureReturn 1
Else
ProcedureReturn CallNextHookEx_(0,nCode,wParam,*p)
EndIf
EndProcedure
MessageRequester("Hook","Alle linken Mausklicks werden abgefangen! Zum beenden drücke Escape.")
SetWindowsHookEx_(#WH_MOUSE_LL,@mousehook(),GetModuleHandle_(0),0)
Repeat
Delay(1)
WindowEvent()
Until GetAsyncKeyState_(#VK_ESCAPE)mfg Ninja
