-------------------------------
Réponse au message :
-------------------------------
Pour les icones il y a :
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Cacher :)
hwnd = FindWindowEx(0&, 0&, "Progman", vbNullString)
ShowWindow hwnd, 0
Visible
hwnd = FindWindowEx(0&, 0&, "Progman", vbNullString)
ShowWindow hwnd, 5
WebMaster-------------------------------
Réponse au message :
-------------------------------
je voudrais savoir comment cacher les icones sur le bureau de windows ?
comment desactiver ou activer le bouton demarrer ?
-------------------------------------------------------
voilà le code pour desactiver le bouton demarrer
Public Function hideStartButton()
'This Function Hides the Start Button'
OurParent& = FindWindow("Shell_TrayWnd", "")
OurHandle& = FindWindowEx(OurParent&, 0, "Button",vbNullString)
ShowWindow OurHandle&, 0
End Function
Public Function showStartButton()
'This Function Shows the Start Button'
OurParent& = FindWindow("Shell_TrayWnd", "")
OurHandle& = FindWindowEx(OurParent&, 0, "Button",vbNullString)
ShowWindow OurHandle&, 5
End Function