SENDKEYS
Résolu
bouv
Messages postés
1411
Date d'inscription
mercredi 6 août 2003
Statut
Membre
Dernière intervention
3 mars 2019
-
10 janv. 2005 à 17:38
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 - 12 janv. 2005 à 14:13
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 - 12 janv. 2005 à 14:13
7 réponses
phantom_2005
Messages postés
184
Date d'inscription
mercredi 8 décembre 2004
Statut
Membre
Dernière intervention
1 septembre 2010
1
12 janv. 2005 à 12:59
12 janv. 2005 à 12:59
Je pense que l'API suivant pourra t'aider :
Declare Function SetKeyboardState Lib "user32" (kbArray As KeyboardBytes) As Long
avec kbArray : Tableau de 256 octets
Il te permet d'établir l'état du clavier grâce à un tableau de 256 octets
Tu peux aller jeter un coupdd'oeil sur le site de DarK Sidious
www.ProgOtoP.com
Bonne continuation
@+
--------------------------------------------------------------------------------
Phantom_2005
Declare Function SetKeyboardState Lib "user32" (kbArray As KeyboardBytes) As Long
avec kbArray : Tableau de 256 octets
Il te permet d'établir l'état du clavier grâce à un tableau de 256 octets
Tu peux aller jeter un coupdd'oeil sur le site de DarK Sidious
www.ProgOtoP.com
Bonne continuation
@+
--------------------------------------------------------------------------------
Phantom_2005
crenaud76
Messages postés
4172
Date d'inscription
mercredi 30 juillet 2003
Statut
Membre
Dernière intervention
9 juin 2006
28
10 janv. 2005 à 18:01
10 janv. 2005 à 18:01
Chez moi, cela fonction avec ou sans le verr. num !! Il envoie les chiffres à chaque fois !!
Christophe R
Christophe R
bouv
Messages postés
1411
Date d'inscription
mercredi 6 août 2003
Statut
Membre
Dernière intervention
3 mars 2019
1
10 janv. 2005 à 18:58
10 janv. 2005 à 18:58
Oups je voulais parler du cadna majuscule minuscule et non du clavier numérique
Bonne prog
++
Bonne prog
++
bouv
Messages postés
1411
Date d'inscription
mercredi 6 août 2003
Statut
Membre
Dernière intervention
3 mars 2019
1
10 janv. 2005 à 18:58
10 janv. 2005 à 18:58
VER MAJ je suppose
Bonne prog
++
Bonne prog
++
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
phantom_2005
Messages postés
184
Date d'inscription
mercredi 8 décembre 2004
Statut
Membre
Dernière intervention
1 septembre 2010
1
11 janv. 2005 à 09:08
11 janv. 2005 à 09:08
Cet API te donne l'état des touches que tu veux:
Private Declare Function GetKeyboardState Lib "user32" (pbKeyState As Byte) As Long
' Enumération des touches que l'on peut être amené à tester
' (cette liste n'est pas exhaustive)
Public Enum eTouche
VK_NUMLOCK = &H90
VK_CAPITAL = &H14
VK_SCROLL = &H91
End Enum
Public Function ToucheActive(lgTouche As eTouche) As Boolean
Dim KeyboardBuffer(256) As Byte
Dim lgRep As Long
' Récupération de l'état de l'ensemble du clavier
lgRep = GetKeyboardState(KeyboardBuffer(0))
If KeyboardBuffer(lgTouche) Then
' La touche sélectionnée est activée
ToucheActive = True
Else
' La touche sélectionnée est inactive
ToucheActive = False
End If
End Function
Après tu peux t'en servir, pour tester l'état de Verr Maj
@+
--------------------------------------------------------------------------------
Phantom_2005
Private Declare Function GetKeyboardState Lib "user32" (pbKeyState As Byte) As Long
' Enumération des touches que l'on peut être amené à tester
' (cette liste n'est pas exhaustive)
Public Enum eTouche
VK_NUMLOCK = &H90
VK_CAPITAL = &H14
VK_SCROLL = &H91
End Enum
Public Function ToucheActive(lgTouche As eTouche) As Boolean
Dim KeyboardBuffer(256) As Byte
Dim lgRep As Long
' Récupération de l'état de l'ensemble du clavier
lgRep = GetKeyboardState(KeyboardBuffer(0))
If KeyboardBuffer(lgTouche) Then
' La touche sélectionnée est activée
ToucheActive = True
Else
' La touche sélectionnée est inactive
ToucheActive = False
End If
End Function
Après tu peux t'en servir, pour tester l'état de Verr Maj
@+
--------------------------------------------------------------------------------
Phantom_2005
bouv
Messages postés
1411
Date d'inscription
mercredi 6 août 2003
Statut
Membre
Dernière intervention
3 mars 2019
1
12 janv. 2005 à 12:45
12 janv. 2005 à 12:45
Merci bien phantom_2005.
Connais-tu par hasard une API dans le même genre qui permet de modifier l'état de ces mêmes touches .
Bonne prog
++
Connais-tu par hasard une API dans le même genre qui permet de modifier l'état de ces mêmes touches .
Bonne prog
++
bouv
Messages postés
1411
Date d'inscription
mercredi 6 août 2003
Statut
Membre
Dernière intervention
3 mars 2019
1
12 janv. 2005 à 14:13
12 janv. 2005 à 14:13
Merci bcp,
Je pense que je vais m'en sortir avec ça.
Bonne prog
++
Je pense que je vais m'en sortir avec ça.
Bonne prog
++
