Fun with the taskbar

[GaryFrost]

In my search for information on the pager control (apparently not widely used except in windows itself) I ran across some old vb code.

I converted it to autoit and got it working on my XP machines (only tested on XP)

expandcollapse popup

#include <WinAPI.au3>
;~ #include <WindowsConstants.au3>

Global Const $SW_HIDE                           = 0
Global Const $SW_SHOW                           = 5

_ShowTaskBar(False)
Sleep ( 2000 )
_ShowTaskBar()

_ShowStartButton(False)
Sleep ( 2000 )
_ShowStartButton()

_ShowTaskBarClock(False)
Sleep ( 2000 )
_ShowTaskBarClock()

_ShowTaskBarIcons(False)
Sleep ( 2000 )
_ShowTaskBarIcons()

For $x = 1 To _TaskBarIndexCount()
    _ShowProgramsShowingInTaskBar(False, $x)
    Sleep(2000)
    _ShowProgramsShowingInTaskBar(True, $x)
Next

Func _ShowTaskBar($fShow = True)
    Local $hTaskBar
    $hTaskBar = _WinAPI_FindWindow("Shell_TrayWnd", "")
    If $fShow Then
        _WinAPI_ShowWindow($hTaskBar, $SW_SHOW)
    Else
        _WinAPI_ShowWindow($hTaskBar, $SW_HIDE)
    EndIf
EndFunc   ;==>_ShowTaskBar

Func _ShowStartButton($fShow = True)
    Local $hTaskBar, $hStartButton
    $hTaskBar = _WinAPI_FindWindow("Shell_TrayWnd", "")
    $hStartButton = ControlGetHandle($hTaskBar, "", "Button1")
    If $fShow Then
        _WinAPI_ShowWindow($hStartButton, $SW_SHOW)
    Else
        _WinAPI_ShowWindow($hStartButton, $SW_HIDE)
    EndIf
EndFunc   ;==>_ShowStartButton

Func _ShowTaskBarClock($fShow = True)
    Local $hTaskBar, $hParent, $hClock
    $hTaskBar = _WinAPI_FindWindow("Shell_TrayWnd", "")
    $hParent = ControlGetHandle($hTaskBar, "", "TrayNotifyWnd1")
    $hClock = ControlGetHandle($hParent, "", "TrayClockWClass1")
    If $fShow Then
        _WinAPI_ShowWindow($hClock, $SW_SHOW)
    Else
        _WinAPI_ShowWindow($hClock, $SW_HIDE)
    EndIf
EndFunc   ;==>_ShowTaskBarClock

Func _ShowTaskBarIcons($fShow = True)
    Local $hTaskBar, $hParent, $hChild
    $hTaskBar = _WinAPI_FindWindow("Shell_TrayWnd", "")
    $hParent = ControlGetHandle($hTaskBar, "", "TrayNotifyWnd1")
    $hChild = ControlGetHandle($hParent, "", "ToolbarWindow321")
    If $fShow Then
        _WinAPI_ShowWindow($hChild, $SW_SHOW)
    Else
        _WinAPI_ShowWindow($hChild, $SW_HIDE)
    EndIf
EndFunc   ;==>_ShowTaskBarIcons

Func _ShowProgramsShowingInTaskBar($fShow = True, $iIndex = 1)
    Local $hTaskBar, $hRebar, $hToolBar
    $hTaskBar = _WinAPI_FindWindow("Shell_TrayWnd", "")
    $hRebar = ControlGetHandle($hTaskBar, "", "ReBarWindow321")
    $hToolBar = ControlGetHandle($hRebar, "", "ToolbarWindow32" & $iIndex)
    If $hToolBar <> 0x00000000 Then
        If $fShow Then
            _WinAPI_ShowWindow($hToolBar, $SW_SHOW)
        Else
            _WinAPI_ShowWindow($hToolBar, $SW_HIDE)
        EndIf
    EndIf
EndFunc   ;==>_ShowProgramsShowingInTaskBar

Func _TaskBarIndexCount()
    Local $hTaskBar, $hRebar, $hToolBar, $iCount = 0
    $hTaskBar = _WinAPI_FindWindow("Shell_TrayWnd", "")
    $hRebar = ControlGetHandle($hTaskBar, "", "ReBarWindow321")
    While 1
        $hToolBar = ControlGetHandle($hRebar, "", "ToolbarWindow32" & $iCount + 1)
        If $hToolBar = 0x00000000 Then ExitLoop
        $iCount += 1
    WEnd
    Return $iCount
EndFunc   ;==>_ShowProgramsShowingInTaskBar

[ResNullius]

Cool Gary!

I can verify all functions working on Win 2000 also.

[BrettF]

LOL! Thats awesome!

[Achilles]

Sweet! I might already have a use for this... I'll give you credit if I do.

[thomaatje]

Cool!

[james3mg]

Everything works on Vista too, except the Start orb is not hidden in the second demo. Anything where you found this code about rearranging the TaskBarIcons, rather than just showing/hiding them? Or showing/hiding a single particular TaskBarIcon?

Cool stuff Thanks

Edit: misread a bit of your code. The TaskBarIcons() functions don't work either (it only hides the arrow that allows you to see the 'hidden' icons), and I mistook ProgramsShowingInTaskbar for TaskBarIcons. And your code answered the question I was trying to get at (I think)...hiding a particular program's taskbar task button (for instance, the AutoIt Help window's button that can minimize and restore the window). But in Vista, there's apparently only 1 ProgramShowingInTaskbar - calling _ShowProgramsShowingInTaskbar(False,1) hides all of the programs, not just the 'first' one. But maybe I misunderstood the code.

Again, thanks. Fun Stuff!

Edited December 12, 2007 by james3mg