J'ai 50 controles qui appelle une fonction =3D Supprime() sur touche
appuy=E9e et je voudrais savoir quel touche a =E9t=E9 enfonc=E9. Je veux
tester au d=E9but de la fonction Supprime() si j'enfonce la touche
supprime sinon je sors de la fonction...Par une proc=E9dure
=E9v=E9nementielle ca serait facile avec le param=E8tre Keycode mais comme
j'ai 50 controle, ca me tente pas d'allourdir mon application de code.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Thom
Bonjour,
Tu trouvera ci-dessous un exemple de code(Source APi Guide http://www.allapi.net/) qui se sert de l'API "GetAsyncKeyState " pour intercepter les événements clavier
Bonne journée
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Function GetPressedKey() As String
For Cnt = 32 To 128
If GetAsyncKeyState(Cnt) <> 0 Then
GetPressedKey = Chr$(Cnt)
next
End Function
a écrit dans le message de news:
Bonjour,
J'ai 50 controles qui appelle une fonction = Supprime() sur touche appuyée et je voudrais savoir quel touche a été enfoncé. Je veux tester au début de la fonction Supprime() si j'enfonce la touche supprime sinon je sors de la fonction...Par une procédure événementielle ca serait facile avec le paramètre Keycode mais comme j'ai 50 controle, ca me tente pas d'allourdir mon application de code.
Alors y'a une solution ??
Merci.
Bonjour,
Tu trouvera ci-dessous un exemple de code(Source APi Guide
http://www.allapi.net/) qui se sert de l'API "GetAsyncKeyState " pour
intercepter les événements clavier
Bonne journée
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As
Integer
Function GetPressedKey() As String
For Cnt = 32 To 128
If GetAsyncKeyState(Cnt) <> 0 Then
GetPressedKey = Chr$(Cnt)
next
End Function
<RBRADETTE@CSTFELICIEN.QC.CA> a écrit dans le message de news:
1166131871.950572.208000@j72g2000cwa.googlegroups.com...
Bonjour,
J'ai 50 controles qui appelle une fonction = Supprime() sur touche
appuyée et je voudrais savoir quel touche a été enfoncé. Je veux
tester au début de la fonction Supprime() si j'enfonce la touche
supprime sinon je sors de la fonction...Par une procédure
événementielle ca serait facile avec le paramètre Keycode mais comme
j'ai 50 controle, ca me tente pas d'allourdir mon application de code.
Tu trouvera ci-dessous un exemple de code(Source APi Guide http://www.allapi.net/) qui se sert de l'API "GetAsyncKeyState " pour intercepter les événements clavier
Bonne journée
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Function GetPressedKey() As String
For Cnt = 32 To 128
If GetAsyncKeyState(Cnt) <> 0 Then
GetPressedKey = Chr$(Cnt)
next
End Function
a écrit dans le message de news:
Bonjour,
J'ai 50 controles qui appelle une fonction = Supprime() sur touche appuyée et je voudrais savoir quel touche a été enfoncé. Je veux tester au début de la fonction Supprime() si j'enfonce la touche supprime sinon je sors de la fonction...Par une procédure événementielle ca serait facile avec le paramètre Keycode mais comme j'ai 50 controle, ca me tente pas d'allourdir mon application de code.
Alors y'a une solution ??
Merci.
Patrice
Bonjour,
On peut connaitre au niveau du formulaire la touche qui a été appuyée et gérer la suppression à ce niveau par activecontrol
Bonjour,
J'ai 50 controles qui appelle une fonction = Supprime() sur touche appuyée et je voudrais savoir quel touche a été enfoncé. Je veux tester au début de la fonction Supprime() si j'enfonce la touche supprime sinon je sors de la fonction...Par une procédure événementielle ca serait facile avec le paramètre Keycode mais comme j'ai 50 controle, ca me tente pas d'allourdir mon application de code.
Alors y'a une solution ??
Merci.
Bonjour,
On peut connaitre au niveau du formulaire la touche qui a été appuyée et
gérer la suppression à ce niveau par activecontrol
Bonjour,
J'ai 50 controles qui appelle une fonction = Supprime() sur touche
appuyée et je voudrais savoir quel touche a été enfoncé. Je veux
tester au début de la fonction Supprime() si j'enfonce la touche
supprime sinon je sors de la fonction...Par une procédure
événementielle ca serait facile avec le paramètre Keycode mais comme
j'ai 50 controle, ca me tente pas d'allourdir mon application de code.
On peut connaitre au niveau du formulaire la touche qui a été appuyée et gérer la suppression à ce niveau par activecontrol
Bonjour,
J'ai 50 controles qui appelle une fonction = Supprime() sur touche appuyée et je voudrais savoir quel touche a été enfoncé. Je veux tester au début de la fonction Supprime() si j'enfonce la touche supprime sinon je sors de la fonction...Par une procédure événementielle ca serait facile avec le paramètre Keycode mais comme j'ai 50 controle, ca me tente pas d'allourdir mon application de code.
Alors y'a une solution ??
Merci.
AfterBoy
Bonjour,
Tu trouvera ci-dessous un exemple de code(Source APi Guide http://www.allapi.net/) qui se sert de l'API "GetAsyncKeyState " pour intercepter les événements clavier
Bonne journée
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Function GetPressedKey() As String
For Cnt = 32 To 128
If GetAsyncKeyState(Cnt) <> 0 Then
GetPressedKey = Chr$(Cnt)
next
End Function
Merci beaucoup, ca fonction avec ce CODE.
Bonjour,
Tu trouvera ci-dessous un exemple de code(Source APi Guide
http://www.allapi.net/) qui se sert de l'API "GetAsyncKeyState " pour
intercepter les événements clavier
Bonne journée
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As
Integer
Tu trouvera ci-dessous un exemple de code(Source APi Guide http://www.allapi.net/) qui se sert de l'API "GetAsyncKeyState " pour intercepter les événements clavier
Bonne journée
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
