Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : désactiver touches clavier [ Archives Visual Basic / J'AI BESOIN D'AIDE !!!! :) ] (satoum66)

samedi 21 mai 2005 à 18:54:55 | désactiver touches clavier

satoum66

salut a tous je veut savoir le code simple en vb.net pour désactiver ctrl+alt+supp(j'ai pas troouvé pour win xp) et menu demarrer et alt+tab.c'est tres important pour moi.
et mersi encore
A+

lundi 23 mai 2005 à 15:33:53 | Re : désactiver touches clavier

nawakator

Je ne sais pas si c'est très facile à faire. Presonnelement je n'y suis pas arriver. Dans ma sociétée on à trouver un truc qui s'appele KeyTrap c'est un programme externe.Les touches Alt+Ctrl+Supp et la touche windows sont géreés par windows puis transmisent à ton application. Il faut donc un programme externe qui les intercepte avant ton application.

Bye,



mardi 24 mai 2005 à 17:58:15 | Re : désactiver touches clavier

satoum66

il m'envoiyé nawakator et je sais pas comment ca marche
Message :
Declare Sub KeyTrapSet Lib "KeyTrap" (ByVal Texte As String, ByVal flag As Boolean)
Declare Sub WWDllInit Lib "KeyTrap" ()
Declare Sub WWDllFree Lib "KeyTrap" ()






' PAGE
'**************************************************************************
'* Fonction : FSE_Clavier                                 Version :  1.00 *
'* Objet    : Blocage/Deblocage clavier KeyTrap                           *
'*                                                                        *
'* Appel(s) particulier(s) :                                              *
'*    - Aucun                                                             *
'* Paramètre(s) d'entrée :                                                *
'*    - Aucun                                                             *
'* Paramètre(s) de sortie:                                                *
'*    - Aucun                                                             *
'* Code de retour        :                                                *
'*    - Aucun                                                             *
'**************************************************************************
Sub FSE_Clavier()

Dim Commande         As String   ' Commande
Dim ValeurCommande   As Integer  ' Etat commande

   ' Action clavier
   Select Case GB_Blocage
      
      ' - Blocage
      Case True
        
         ' * Blocage du clavier
         Call WWDllInit
        
         Commande = "TRAP" + Chr(0)
         ValeurCommande = 1
         Call KeyTrapSet(Commande, ValeurCommande)
        
         Commande = "REBOOT" + Chr(0)
         ValeurCommande = 0
         Call KeyTrapSet("REBOOT" + Chr(0), ValeurCommande)
        
         ValeurCommande = 0
         Commande = "TASKSWITCH" + Chr(0)
         Call KeyTrapSet("TASKSWITCH" + Chr(0), ValeurCommande)
        
         ' * Modification icone du bouton
         Menu.BoutonBlocage.Picture = LoadPicture(K_ICONBLOCAGE)
         ' * Bouton 'quitter' invisible
         Menu.Quitter.Visible = False

      ' - Déblocage
      Case False
        
         ' * Déblocage du clavier
         Commande = "TRAP" + Chr(0)
         ValeurCommande = 1
         Call KeyTrapSet(Commande, ValeurCommande)
        
         Commande = "REBOOT" + Chr(0)
         Call KeyTrapSet("REBOOT" + Chr(0), ValeurCommande)
        
         Commande = "TASKSWITCH" + Chr(0)
         Call KeyTrapSet("TASKSWITCH" + Chr(0), ValeurCommande)
        
         Call WWDllFree
         ' * Modification icone du bouton
         Menu.BoutonBlocage.Picture = LoadPicture(K_ICONDEBLOCAGE)
         ' * Bouton 'quitter' visible
         Menu.Quitter.Visible = True

   End Select

End Sub




Cette discussion est classé dans : alt, clavier, touches, désactiver


Répondre à ce message

Sujets en rapport avec ce message

Désactiver les touches Windows, CTRL+ALT+DEL, CTRL+ESC [ par asel ] Bonjour, je voudrais savoir comment faire pour désactiver la touche Windows, ainsi que les combinaisons des touches CTRL+ALT+DEL, CTRL+ESC. J'ai fait Comment désactiver le clavier du portable? [ par gaetan83 ] Bonjour à tous, Il m'est arrivé un malheur sur mon ordi portable (acer travelmate 230 / win XP) puisque j'ai renversé un peu de lait sur le clavier. C espion touches / clavier [ par maloadore ] Bonjour à tous!J'ai effectué un GetAsyncKeyState dans une boucle For comme expliqué dans plusieurs des sources de ce site.Toutefois, une chose me cont raccourci clavier [ par adnotlegland ] bonjour à tous,j'ai un vieux clavier qui contient des touches raccourci genre: "aide", "trouver", "imprimer", "fax", etc.... et vu que les drivers de numero des touches du clavier [ par dOsSpr0uTosS ] Salut à tous,je suis entrain de fair un programme et je voulais savoir les numeros des touches du clavier car je voudrais me servir d'elles pour comma Désactiver touches systèmes [ par cyrixos ] Bonjour à tous, J'ai créé un programme avec une fenêtre qui recouvre tout l'écran cencé protéger le pc. Mais les touches Windows, CTRL+ALT+SUPPR marc Intercepter fleches clavier [ par Xneo ] Salut, sous VB6, dans une Form, je voudrais intercepter les touches "fleches". Aucun souci pour les autres touches, mais jtrouve pas pour ces fleches! Intercepter fleches clavier [ par Xneo ] Salut, sous VB6, dans une Form, je voudrais intercepter les touches "fleches". Aucun souci pour les autres touches, mais jtrouve pas pour ces fleches! Intercepter fleches clavier [ par Xneo ] Salut, sous VB6, dans une Form, je voudrais intercepter les touches "fleches". Aucun souci pour les autres touches, mais jtrouve pas pour ces fleches! Intercepter fleches clavier [ par Xneo ] Salut, sous VB6, dans une Form, je voudrais intercepter les touches "fleches". Aucun souci pour les autres touches, mais jtrouve pas pour ces fleches!


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,359 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.