Playing with the TaskBar

[Rings]

Code updated for 5.20+

Code: Select all

#TaskBar_Open_Start_Menu=$131
#TaskBar_Open_Run_Dialog=$191
#TaskBar_Logoff_Screen=$192
#TaskBar_Cascade_Windows=$193
#TaskBar_Tile_Windows=$195
#TaskBar_Date_Time_Properties=$198
#Taskbar_Properties=$19D
#TaskBar_UnDoMinimize_All_Windows=$1A0
#Minimize_All_Windows=$1A3
#TaskBar_ShowTaskManager=$1A4
#TaskBar_Customize_Notifications=$1A5
#TaskBar_Lock_Unlock__Taskbar=$1A8
#TaskBar_Help_Support=$1F7
#TaskBar_Open_Control_Panel=$1F9
#TaskBar_Turn_Off_Dialog=$1FA
#TaskBar_Open_Printers=$1FE
#TaskBar_Tile_Windows_Horizontally=$10194

hWnd = FindWindow_("Shell_TrayWnd","")
If hWnd
 SendMessage_(hWnd,#WM_COMMAND,#Minimize_All_Windows,0)
EndIf

[Fangbeast]

And gives new possibilities for my programs. Thanks Rings!!!

[Psychophanta]

That's nice
Than you

[Intrigued]

Thanks Rings!

[Dare2]

Thank you.

[oridan]

Thanks Rings

[HAnil]

Hi,

Can I change Taskbar size ? How ?

I looked for movewindow_(hwnd,x,y,w,h,0) .
but movewindow function can't work for size.
Any suggestion welcome.
HAnil

[Psychophanta]

An addendum to test all:

Code: Select all

#TaskBar_Open_Start_Menu=$131
#TaskBar_Open_Run_Dialog=$191
#TaskBar_Logoff_Screen=$192
#TaskBar_Cascade_Windows=$193
#TaskBar_Tile_Windows=$195
#TaskBar_Date_Time_Properties=$198
#Taskbar_Properties=$19D
#TaskBar_UnDoMinimize_All_Windows=$1A0
#Minimize_All_Windows=$1A3
#TaskBar_ShowTaskManager=$1A4
#TaskBar_Customize_Notifications=$1A5
#TaskBar_Lock_Unlock__Taskbar=$1A8
#TaskBar_Help_Support=$1F7
#TaskBar_Open_Control_Panel=$1F9
#TaskBar_Turn_Off_Dialog=$1FA
#TaskBar_Open_Printers=$1FE
#TaskBar_Tile_Windows_Horizontally=$10194
DataSection
action:
Data.l #TaskBar_Open_Start_Menu,#TaskBar_Open_Run_Dialog,#TaskBar_Logoff_Screen,#TaskBar_Cascade_Windows
Data.l #TaskBar_Tile_Windows,#TaskBar_Date_Time_Properties,#Taskbar_Properties,#TaskBar_UnDoMinimize_All_Windows
Data.l #Minimize_All_Windows,#TaskBar_ShowTaskManager,#TaskBar_Customize_Notifications,#TaskBar_Lock_Unlock__Taskbar
Data.l #TaskBar_Help_Support,#TaskBar_Open_Control_Panel,#TaskBar_Turn_Off_Dialog,#TaskBar_Open_Printers
Data.l #TaskBar_Tile_Windows_Horizontally
EndDataSection
If OpenWindow(0,0,0,270,40,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"Choose an action:") And CreateGadgetList(WindowID(0))
  ComboBoxGadget(0,10,10,250,250)
  AddGadgetItem(0,-1,"TaskBar_Open_Start_Menu")
  AddGadgetItem(0,-1,"TaskBar_Open_Run_Dialog")
  AddGadgetItem(0,-1,"TaskBar_Logoff_Screen")
  AddGadgetItem(0,-1,"TaskBar_Cascade_Windows")
  AddGadgetItem(0,-1,"TaskBar_Tile_Windows")
  AddGadgetItem(0,-1,"TaskBar_Date_Time_Properties")
  AddGadgetItem(0,-1,"Taskbar_Properties")
  AddGadgetItem(0,-1,"TaskBar_UnDoMinimize_All_Windows")
  AddGadgetItem(0,-1,"Minimize_All_Windows")
  AddGadgetItem(0,-1,"TaskBar_ShowTaskManager")
  AddGadgetItem(0,-1,"TaskBar_Customize_Notifications")
  AddGadgetItem(0,-1,"TaskBar_Lock_Unlock__Taskbar")
  AddGadgetItem(0,-1,"TaskBar_Help_Support")
  AddGadgetItem(0,-1,"TaskBar_Open_Control_Panel")
  AddGadgetItem(0,-1,"TaskBar_Turn_Off_Dialog")
  AddGadgetItem(0,-1,"TaskBar_Open_Printers")
  AddGadgetItem(0,-1,"TaskBar_Tile_Windows_Horizontally")
  Repeat:EventID.l=WaitWindowEvent()
  If EventID.l=#PB_Event_Gadget And GetGadgetState(0)>-1
    hWnd.l = FindWindow_("Shell_TrayWnd","")
    If hWnd.l
     SendMessage_(hWnd.l,#WM_COMMAND,PeekL(?action+GetGadgetState(0)*#SizeOf_Long),0)
    EndIf
    Break
  EndIf
  Until EventID.l=#PB_Event_CloseWindow
EndIf