Api Keybd_Event()

Question

Bonjour,
j'essaye, en vain, de faire fonctionner la s&#233;quence suivante pour aider mon fils 
qui est handicap&#233;. Quelqu'un a une id&#233;e ?
 
' D&#233;clarations
Public Const vbKeyF7 = 118    'Touche F7 
Public Const vbKeyShift = 16   'Touche Shift
Public Const vbKeyEnd = 35   'Touche Fin
Public Const vbKeyControl = 17   'Touche Ctrl
Public Const vbKeyC = 67   'Touche C


Private Declare Sub keybd_event Lib "user32.dll" ( _
        ByVal bVk As Byte, _ 
        ByVal bScan As Byte, _ 
        ByVal dwFlags As Long, _
        ByVal dwExtraInfo As Long)



' Dans un bouton
.../..


' S&#233;quence [F7] Passage en mode Modification
keybd_event(vbKeyF7, 0, 0, 0) 
keybd_event(vbKeyF7, 0, 2, 0)


' S&#233;quence [Shift] + [Fin] pour s&#233;lectionner le texte &#224; r&#233;cup&#233;rer
keybd_event(vbKeyShift, 0, 0, 0) 
keybd_event(vbKeyEnd, 0, 0, 0) 
keybd_event(vbKeyEnd, 0, 2, 0) 
keybd_event(vbKeyShift, 0, 2, 0) 


' S&#233;quence [Ctrl] + [C] pour copier le texte dans le presse papier
keybd_event(vbKeyControl, 0, 0, 0) 
keybd_event(vbKeyC, 0, 0, 0)
keybd_event(vbKeyC, 0, 2, 0)
keybd_event(vbKeyControl, 0, 2, 0) 

 JM

Gobillot · Answer

inutile de d&#233;clarer les constantes vb qui sont d&#233;j&#224; definies.

Daniel

cs_DARKSIDIOUS · Answer

Je te conseille de faire des sleep (fonction de l'API windows) entre
les &#233;v&#233;nements KeyDown et KeyUp pour que le syst&#232;me est le temps de les
intercepter, ca vient s&#251;rement de l&#224; ton probl&#232;me !

DarK Sidious

[Administrateur et responsable VB/API du site  ProgOtoP]

jmdelhalle · Answer

j'ai essay&#233; de mettre des sleep, mais cela ne change rien. Je passe bien
sur les champs mais je ne r&#233;cup&#233;re rien dans le presse papier

 JM

Gobillot · Answer

tu dois donner le focus &#224; ce que tu copie avant d'envoyer les caract&#232;res.

Daniel

Api Keybd_Event()

4 réponses

Discussions similaires