Bloquer ALT+TAB (version ortographiée ;) )

tinux Messages postés 244 Date d'inscription mercredi 13 avril 2005 Statut Membre Dernière intervention 21 octobre 2013 - 14 mai 2006 à 15:13
leaderdut Messages postés 1 Date d'inscription dimanche 25 février 2007 Statut Membre Dernière intervention 28 février 2007 - 28 févr. 2007 à 12:24
Bonjour à tous !

Voilà j'ai parcouru le forum sans trouver de réelle réponse pour bloquer ALT+TAB.

En effet, je ne cherche pas a empecher Alt+Supp+Ctrl, ni Alt+F4, ni Alt+Echap mais uniquement ALT+TAB !

Note : C'est du .NET !

Merci pour vos reponses :D

1 réponse

leaderdut Messages postés 1 Date d'inscription dimanche 25 février 2007 Statut Membre Dernière intervention 28 février 2007
28 févr. 2007 à 12:24
Cette version est valable pour win95 et win98:

Private Const SPI_SCREENSAVERRUNNING = 97&
      Private Declare Function SystemParametersInfo Lib "User32" _
          Alias "SystemParametersInfoA" _
         (ByVal uAction As Long, _
          ByVal uParam As Long, _
          lpvParam As Any, _
          ByVal fuWinIni As Long) As Long

      Private Sub Form_Load()
         Command1.Caption = "Disabled"
         Command2.Caption = "Enabled"
      End Sub

      Private Sub Form_Unload(Cancel As Integer)
         'Re-enable CTRL+ALT+DEL and ALT+TAB before the program terminates.
         Command2_Click
      End Sub

      Private Sub Command1_Click()
         Dim lngRet As Long
         Dim blnOld As Boolean
         lngRet = SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, _
         blnOld, _
            0&)
      End Sub

      Private Sub Command2_Click()
        Dim lngRet As Long
        Dim blnOld As Boolean
        lngRet = SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, _
        blnOld, _
           0&)
      End Sub

'Appuyez sur la touche F5 pour exécuter le programme et cliquez ensuite, sur le bouton "Désactivé". CTRL + ALT + SUPPR et ALT + TAB sont désactivés. Cliquez sur le bouton "Enabled" pour activer à nouveau CTRL + ALT + SUPPR et ALT + TAB.
Rejoignez-nous