Hejsan,
Jag har gjort ett antal försök att använda koden som döljer startknappen (ligger på Tips&tricks). Men det slutar hur jag än gör med ett error meddelande på Findwindow vad är det för fel någon som vet?

Koden är följande:
Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

Function hideStartButton()
'Denna funktion döljerstartknappen
OurParent& = FindWindow("Shell_TrayWnd", "")
OurHandle& = FindWindowEx(OurParent&, 0, "Button", vbNullString)
ShowWindow OurHandle&, 0
End Function

Function showStartButton()
'Denna funktion visar startknappen
OurParent& = FindWindow("Shell_TrayWnd", "")
OurHandle& = FindWindowEx(OurParent&, 0, "Button", vbNullString)
ShowWindow OurHandle&, 5
End Function

Bosse

Se om det här funkar.

<code>
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
</code>

/Micke

När jag la dit det så hängde det sig på nästa Findwindowex och när jag lade en liknande rad för det så skrev den Wrong number of arguments istället.

Bosse

Ursäkta mig, såg inte den andra.

<code>
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
</code>

Den ska också med.

/Micke

Tack nu fungerade det!!

Bosse