clavier [Résolu]

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Avatar de l’utilisateur
Fortix
Messages : 559
Inscription : mar. 30/mai/2006 17:03

clavier [Résolu]

Message 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))
Dernière modification par Fortix le jeu. 13/janv./2011 21:33, modifié 1 fois.
nico
Messages : 3702
Inscription : ven. 13/févr./2004 0:57

Re: clavier

Message par nico »

De mémoire c'est keybd_event_(...)
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Re: clavier

Message par Backup »

........................
Dernière modification par Backup le dim. 20/mars/2011 13:11, modifié 1 fois.
Avatar de l’utilisateur
Fortix
Messages : 559
Inscription : mar. 30/mai/2006 17:03

Re: clavier

Message 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)))
Avatar de l’utilisateur
Fortix
Messages : 559
Inscription : mar. 30/mai/2006 17:03

Re: clavier

Message 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é :wink:
Backup
Messages : 14526
Inscription : lun. 26/avr./2004 0:40

Re: clavier

Message 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é :wink:
t'as essayé quoi ??

ça ??? ...... heu ! ya un probleme là :roll: tu crois pas ??
tu dis que tu veux simuler l'appuis sur "Ctrl" et toi tu fais appuyer la touche "Menu" .. :roll:
apres tu dis que tu veux appuyer la touche "ALT" ; et tu fais appuyer "Shift" :roll:

heu t'as fumé quoi ? 8O
Avatar de l’utilisateur
Fortix
Messages : 559
Inscription : mar. 30/mai/2006 17:03

Re: clavier

Message par Fortix »

mauvaise frappe :lol:

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

:lol:

de toute façon je doute que sa marche :wink:
Avatar de l’utilisateur
Fortix
Messages : 559
Inscription : mar. 30/mai/2006 17:03

Re: clavier

Message par Fortix »

Super sa fonctionne très bien :D

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 :lol:
Répondre