PB 5.60(x86) under win7
Code: Select all
If OpenWindow(0, 0, 0, 150, 60, "ToolBar", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    If CreateToolBar(0, WindowID(0))
      ToolBarStandardButton(0, #PB_ToolBarIcon_New)
      ToolBarStandardButton(1, #PB_ToolBarIcon_Open)
      ToolBarStandardButton(2, #PB_ToolBarIcon_Save)
      DisableToolBarButton(0, 1, 1) : Disabled = #True
      ToolBarImageButton(3, LoadImage(0, #PB_Compiler_Home + "examples/sources/Data/Cdplayer.ico"))
      ToolBarToolTip(0, 2, "save")
      ToolBarToolTip(0, 3, "Cdplayer")
      DisableToolBarButton(0,3, 1)
    EndIf
    ButtonGadget(0, 20, 30, 110, 20, "Enable OpenFile")
    Repeat
      Event = WaitWindowEvent()
      If Event = #PB_Event_Gadget
        If EventGadget() = 0
          If Disabled = #True
            DisableToolBarButton(0, 1, 0)
            DisableToolBarButton(0,3, 0)
            SetGadgetText(0,"Disable OpenFile")
            Disabled = #False
          Else
            DisableToolBarButton(0, 1, 1)
            DisableToolBarButton(0,3, 1)
            SetGadgetText(0,"Enable OpenFile")
            Disabled = #True
          EndIf
        EndIf
      EndIf
    Until Event = #PB_Event_CloseWindow 
  EndIf




