clavier [Résolu]
clavier [Résolu]
Salut
Comment fait on pour simuler l'appuit d'un (ou des) bouton du clavier pour tout simplement l'activer via un simple bouton gadget d'une fenêtre?
merci))
Comment fait on pour simuler l'appuit d'un (ou des) bouton du clavier pour tout simplement l'activer via un simple bouton gadget d'une fenêtre?
merci))
Dernière modification par Fortix le jeu. 13/janv./2011 21:33, modifié 1 fois.
Re: clavier
De mémoire c'est keybd_event_(...)
Re: clavier
........................
Dernière modification par Backup le dim. 20/mars/2011 13:11, modifié 1 fois.
Re: clavier
merci beaucoup,
je t'assures @Dobro que j'ai cherché avec les mots clé "clavier" et "bouton"
puis il y a une quantitée pas possible avec des sujets qui n'ont aucuns rapport!
de plus, il ma semblé l'avoir éffectivement vue il y a dejà très longtemps mais je n'en avais pas besoin
à cette époque et que je n'ai plus jamais réussit à retrouver...
je vais tester ton code dessuite)))
je t'assures @Dobro que j'ai cherché avec les mots clé "clavier" et "bouton"
puis il y a une quantitée pas possible avec des sujets qui n'ont aucuns rapport!
de plus, il ma semblé l'avoir éffectivement vue il y a dejà très longtemps mais je n'en avais pas besoin
à cette époque et que je n'ai plus jamais réussit à retrouver...
je vais tester ton code dessuite)))
Re: clavier
le code est correct,
mais malheureusement se que je voulais faire c'est activer un raccourcit via l'appuit de 3 touches
"Ctrl"+"Alt"+"2" pour le mode "clavier Alphabet Cirilique" et "Ctrl"+"Alt"+"1" pour le mode "clavier Alphabet normal"
on aura essayé 
mais malheureusement se que je voulais faire c'est activer un raccourcit via l'appuit de 3 touches
"Ctrl"+"Alt"+"2" pour le mode "clavier Alphabet Cirilique" et "Ctrl"+"Alt"+"1" pour le mode "clavier Alphabet normal"
Code : Tout sélectionner
res = keybd_event_ ( #VK_LMENU ,0,0,0)
res1 = keybd_event_ ( #VK_SHIFT ,0,0,0)
res2 = keybd_event_ ( #VK_2 ,0,0,0)
keybd_event_ ( #VK_LMENU ,0,2,0)
keybd_event_ ( #VK_SHIFT ,0,2,0)
keybd_event_ ( #VK_2 ,0,2,0)
If res And res1 And res2
Debug "Ok"
EndIf

Re: clavier
t'as essayé quoi ??Fortix a écrit :le code est correct,
mais malheureusement se que je voulais faire c'est activer un raccourcit via l'appuit de 3 touches
"Ctrl"+"Alt"+"2" pour le mode "clavier Alphabet Cirilique" et "Ctrl"+"Alt"+"1" pour le mode "clavier Alphabet normal"
on aura essayéCode : Tout sélectionner
res = keybd_event_ ( #VK_LMENU ,0,0,0) res1 = keybd_event_ ( #VK_SHIFT ,0,0,0) res2 = keybd_event_ ( #VK_2 ,0,0,0)
ça ??? ...... heu ! ya un probleme là

tu dis que tu veux simuler l'appuis sur "Ctrl" et toi tu fais appuyer la touche "Menu" ..

apres tu dis que tu veux appuyer la touche "ALT" ; et tu fais appuyer "Shift"

heu t'as fumé quoi ?

Re: clavier
mauvaise frappe
en fait c'est:
Ctrl+Shift+1 (mode alphabet normal)
Ctrl+Shift+2 (mode alphabet Cyrillique)
de toute façon je doute que sa marche

en fait c'est:
Ctrl+Shift+1 (mode alphabet normal)
Ctrl+Shift+2 (mode alphabet Cyrillique)

de toute façon je doute que sa marche

Re: clavier
Super sa fonctionne très bien
merci beaucoup 

Code : Tout sélectionner
If OpenWindow(0,100,100,400,400,"")
EditorGadget(0,0,0,400,400)
EndIf
Repeat
Event = WaitWindowEvent()
WindowID = EventWindow()
GadgetID = EventGadget()
EventType = EventType()
If GetAsyncKeyState_(#VK_3):Debug "Mode cyrillique"
keybd_event_ ( #VK_CONTROL ,0,0,0)
keybd_event_ ( #VK_SHIFT ,0,0,0)
keybd_event_ ( #VK_2 ,0,0,0)
keybd_event_ ( #VK_CONTROL ,0,2,0)
keybd_event_ ( #VK_SHIFT ,0,2,0)
keybd_event_ ( #VK_2 ,0,2,0)
EndIf
If GetAsyncKeyState_(#VK_4):Debug "Mode normal"
keybd_event_ ( #VK_CONTROL ,0,0,0)
keybd_event_ ( #VK_SHIFT ,0,0,0)
keybd_event_ ( #VK_1 ,0,0,0)
keybd_event_ ( #VK_CONTROL ,0,2,0)
keybd_event_ ( #VK_SHIFT ,0,2,0)
keybd_event_ ( #VK_1 ,0,2,0)
EndIf
Until GetAsyncKeyState_(#VK_BACK)
