Discussion :

[castelom]

Bonjour a tous
peux quelqu'un courige ce code sourse:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Declare Function BlockInpute Lib "user32" (ByVal fBlock As Long) As Long
 
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
 
Private Sub Form_Load()
DoEvents
BlockInput True
Sleep 2000
BlocInput False
End Sub

Ce code source devrai permettre l'arrêt de la souris et du clavier en 2seconde 2000=2seconds....mais j'ai pas trouvez ou est le problème de ce code
Svp peux quelqu'un m'aider et merci

[ucfoutu]

Bonjour,

je te suggère d'apporter du soin à ce que tu coipies...
BlockInput ne prend pas de e ici :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Declare Function BlockInpute Lib "user32" (ByVal fBlock As Long) As Long

et il lui manque un k là :
BlockInput False

au lieu de te précipiter pour "poster" un "problème" !

[castelom]

Bonjour,

je te suggère d'apporter du soin à ce que tu coipies...
BlockInput ne prend pas de e ici :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Declare Function BlockInpute Lib "user32" (ByVal fBlock As Long) As Long

et il lui manque un k là :
BlockInput False

au lieu de te précipiter pour "poster" un "problème" !

Merci mon frere,et moi avec ce projet je te jure que je ne fasse aucun mal a person.

[OhMonBato]

Bonjour,

mais à quoi te sert donc de bloquer souris et clavier pendant 2 secondes ?

[Eausport]

C'est surement il veut faire un tour a ces ami(e)s ,

Mais pour le blocage , tu peux jouer avec les codes ASCII des touches.