IDDN CertificationIDDN Certification
 
  Moteur de recherche
Recherche personnalisée
 
   

 
Menu Principal

 Accueil
 Jeu de rôle en ligne
 Programmation
    avec Cours...
 Liens (ANNUAIRE)
 Conseiller à un ami
 Statistiques-TOP 10
 Me contacter
 

   

 
SERVICES

 OFFRES D'EMPLOI
 Appartement à vendre
 

 
Partenaires

 Les Partenaires

 
 

Activer Ctrl + Alt + Suppr et Alt + Tab  


Cette API permet d'activer la combinaison des touches CTRL + ALT + SUPPR et ALT + TAB

'Déclaration
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 Const SPI_SCREENSAVERRUNNING = 97

'Procédure
Public Sub ActiveCtrlAltSupprEtAltTab()
   Dim ret As Integer
   Dim pOld As Boolean
   ret=SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, pOld, 0)
End Sub


Il y a aussi : Désactiver Ctrl + Alt + Suppr et Alt + Tab

Cette API permet de désactiver la combinaison des touches CTRL + ALT + SUPPR et ALT + TAB

'Déclaration
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 Const SPI_SCREENSAVERRUNNING = 97

'Procédure
Public Sub DesctiveCtrlAltSupprEtAltTab()
   Dim ret As Integer
   Dim pOld As Boolean
   ret=SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, pOld, 0)
End Sub

 



[ Jeux gratuits ] - [ photo ] - [ photo numerique ] - [ programmation ]
[ Foot Phocéen / Olympique de Marseille ] - [ turf / pmu / paris ] - [ payer moins d'impot ] -

Copyright © 2000-2009 LCL2000.COM
Reproduction totale ou partielle interdite sur quelque
support que ce soit sans l'accord de l'auteur
Tous droits réservés.
La confidentialité de vos données sur ce site est préservée.
LCL2000.com est déclaré à la CNIL sous le n°1007192