Feedback

VB - Taskleiste verstecken

Veröffentlicht von am 26.11.2006
(1 Bewertungen)
Mit dieser Funktion kann man die Taskleiste verstecken und wieder anzeigen.
Private Declare Auto Function FindWindow Lib "user32" ( _
    ByVal lpClassName As String, _
    ByVal lpWindowName As String) _
As Integer

Private Declare Auto Sub SetWindowPos Lib "User32" ( _
    ByVal hWnd As Integer, _
    ByVal hWndInsertAfter As Integer, _
    ByVal X As Integer, _
    ByVal Y As Integer, _
    ByVal cx As Integer, _
    ByVal cy As Integer, _
    ByVal wFlags As Integer)
    
Public Sub TaskBarVisible(ByVal Visible As Boolean)
    Dim Handle As Integer = FindWindow("Shell_TrayWnd", "")

    If Visible = True Then
        SetWindowPos(Handle, 0, 0, 0, 0, 0, 64)
    Else
        SetWindowPos(Handle, 0, 0, 0, 0, 0, 128)
    End If
End Sub
Abgelegt unter FindWindow, SetWindowPos, Taskbar, Taskleiste.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!