pcman5
Messages postés132Date d'inscriptionmercredi 12 juin 2002StatutMembreDernière intervention26 janvier 2006
-
10 avril 2003 à 12:06
tH3 GuItArIsTe 666
Messages postés58Date d'inscriptionjeudi 12 mai 2005StatutMembreDernière intervention26 août 2006
-
14 juil. 2005 à 21:47
Commen fait-on pour pouvoire supprimer l'alt-ctrl-supp sous XP?
Tous les sources que j'ai trouver ne fonctionne pas avec XP.
Si vous avvez queque chose pour désactiver la barre de tache aussi...
BasicInstinct
Messages postés1470Date d'inscriptionmardi 5 février 2002StatutMembreDernière intervention20 octobre 201412 10 avril 2003 à 13:57
pour la barre des taches : (fonctionne sous 2000)
Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, _
ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, _
ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( _
ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long
Public Function GetTaskbarHWND() As Long
GetTaskbarHWND = FindWindow("shell_traywnd", "")
End Function
Public Sub HideTaskbar()
' Cacher la barre des tâches
Dim hWin As Long
hWin = GetTaskbarHWND()
retour = SetWindowPos(hWin, 0, 0, 0, 0, 0, &H80)
End Sub
Public Sub ShowTaskbar()
' Afficher la barre des tâches
Dim hWin As Long
hWin = GetTaskbarHWND()
retour = SetWindowPos(hWin, 0, 0, 0, 0, 0, &H40)
End Sub
pour desactiver la touche windows du clavier: (tjs sous 2000)
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Keyboard Layout
Si nécessaire, créez la clé de type REG_BINARY nommée Scancode Map
Mettez la valeur suivant dans la clé :
00 00 00 00 00 00 00 00 03 00 00 00 00 00 5B E0 00 00 5C E0 00 00 00 00
Pour le Ctrl alt suppr, alt tab, je cherche toujours :(