Code: Select all
OpenWindow(0, 100, 100, 400, 300, "Splitter Example", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
StringGadget(1, 0, 0, 0, 0, "Up Panel", #PB_Text_Center)
StringGadget(2, 0, 0, 0, 0, "Down Panel", #PB_Text_Center)
StringGadget(3, 0, 200, 0, 100, "hide Panel", #PB_Text_Center)
ButtonGadget(100,50,200,100,10,"button")
HideGadget(3,#True)
SplitterGadget(5, 10, 100, 380, 180,1, 3)
SplitterGadget(4, 10, 0, 380, 180, 1, 2)
Repeat
Event = WaitWindowEvent()
Select Event
Case #PB_Event_Gadget
Select EventGadget()
Case 100:
HideGadget(3,#False)
HideGadget(2,#True)
EndSelect
EndSelect
Until Event = #PB_Event_CloseWindow