show or hide taskbar

[vincenz2004]

Code updated for 5.20+

This really helped me, so I hope it helps someone else. It is the code to toggle the status of the windows (XP) taskbar (SHOW or HIDE):

Code: Select all

Procedure showtaskbar(tbstate.s)
  handleW1 = FindWindow_("Shell_traywnd", "")
  If(tbstate="S")
    SetWindowPos_(handleW1, 0, 0, 0, 0, 0, #SWP_SHOWWINDOW)
  EndIf
  If(tbstate="H")
    SetWindowPos_(handleW1, 0, 0, 0, 0, 0, #SWP_HIDEWINDOW)
  EndIf
EndProcedure

showtaskbar("S")
;showtaskbar("H")

[srod]

Hi, nice code.

Does this only work for Win XP or will it also work on Win 98 etc?

Regards.

[dige]

better use the windows constants:

Code: Select all

; ShowWindow
SetWindowPos_(handleW1, 0, 0, 0, 0, 0, #SWP_SHOWWINDOW) 

; HideWindow
SetWindowPos_(handleW1, 0, 0, 0, 0, 0, #SWP_HIDEWINDOW) 

[lee__48]

Hi, nice code.
Does this only work for Win XP or will it also work on Win 98 etc?
Regards.

I tested the following on Windows 2000 and 98. Works fine!

Code: Select all

SetWindowPos_(FindWindow_("Shell_traywnd", ""), 0, 0, 0, 0, 0, #SWP_HIDEWINDOW)
Delay(1200)
SetWindowPos_(FindWindow_("Shell_traywnd", ""), 0, 0, 0, 0, 0, #SWP_SHOWWINDOW)