M
MoonLiver
I want to be able to go thru all of the windows and disable the start
button on each. it seems like this should work, but its only effecting
the foreground Window. Does everything work okay here?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs)
Dim myWindows() As Window
myWindows = WindowHelper.EnumerateTopWindows()
For i As Integer = 0 To UBound(myWindows)
HideStartIcon(myWindows(i).Handle)
Next
End Sub
End Class
Public Module dudex
<DllImport("aygshell.dll", EntryPoint:="SHFullScreen",
SetLastError:=True)> _
Private Function SHFullScreen( _
ByVal hwndRequester As IntPtr, _
ByVal dwState As Integer) As Boolean
End Function
Public Sub HideStartIcon(ByRef myHwnd As IntPtr)
Const SHFS_SHOWTASKBAR = &H1
Const SHFS_HIDETASKBAR = &H2
Const SHFS_SHOWSIPBUTTON = &H4
Const SHFS_HIDESIPBUTTON = &H8
Const SHFS_SHOWSTARTICON = &H10
Const SHFS_HIDESTARTICON = &H20
SHFullScreen(myHwnd, SHFS_HIDESTARTICON)
End Sub
End Module
button on each. it seems like this should work, but its only effecting
the foreground Window. Does everything work okay here?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs)
Dim myWindows() As Window
myWindows = WindowHelper.EnumerateTopWindows()
For i As Integer = 0 To UBound(myWindows)
HideStartIcon(myWindows(i).Handle)
Next
End Sub
End Class
Public Module dudex
<DllImport("aygshell.dll", EntryPoint:="SHFullScreen",
SetLastError:=True)> _
Private Function SHFullScreen( _
ByVal hwndRequester As IntPtr, _
ByVal dwState As Integer) As Boolean
End Function
Public Sub HideStartIcon(ByRef myHwnd As IntPtr)
Const SHFS_SHOWTASKBAR = &H1
Const SHFS_HIDETASKBAR = &H2
Const SHFS_SHOWSIPBUTTON = &H4
Const SHFS_HIDESIPBUTTON = &H8
Const SHFS_SHOWSTARTICON = &H10
Const SHFS_HIDESTARTICON = &H20
SHFullScreen(myHwnd, SHFS_HIDESTARTICON)
End Sub
End Module