Cette Q&R a été trouvée sur WDForge.org

Comment bloquer le clavier ou la souris

Demandé et répondu par Drcharly93 le 15-Jun-2007 15:40

Comment bloquer le clavier ou la souris

gnHandleHook étant une variable global de la fenetre
code de declaration de la fenetre

gnHandleHook est un entier

Code clic commence blocage clavier

gnHandleHook = API("user32","SetWindowsHookExA",13,&Procédure_Hook, Instance() ,0)

Creer une procedure globale

PROCEDURE Procédure_Hook(ncode, wParam, lParam) 
RENVOYER -1

code du clic termine blocage clavier

 
SI PAS API("user32","UnhookWindowsHookEx",gnHandleHook) ALORS
	Erreur("erreur ")
FIN

Pour bloquer la souris il suffit de remplacer 13 par 14