Page 1 sur 1
clavier [Résolu]
Publié : jeu. 13/janv./2011 13:01
par Fortix
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))
Re: clavier
Publié : jeu. 13/janv./2011 13:36
par nico
De mémoire c'est keybd_event_(...)
Re: clavier
Publié : jeu. 13/janv./2011 15:30
par Backup
........................
Re: clavier
Publié : jeu. 13/janv./2011 19:44
par Fortix
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)))
Re: clavier
Publié : jeu. 13/janv./2011 20:07
par Fortix
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"
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
on aura essayé

Re: clavier
Publié : jeu. 13/janv./2011 20:16
par Backup
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"
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)
on aura essayé

t'as essayé quoi ??
ça ??? ...... heu ! ya un probleme là

tu crois pas ??
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
Publié : jeu. 13/janv./2011 21:14
par Fortix
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

Re: clavier
Publié : jeu. 13/janv./2011 21:32
par Fortix
Super sa fonctionne très bien
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)
merci beaucoup
