Basic Univers
#TCS_BOTTOM = 2
If OpenWindow(0, 0, 0, 322, 220, #PB_Window_SystemMenu|#PB_Window_ScreenCentered, "PanelGadget") And CreateGadgetList(WindowID(0))
hPgad = PanelGadget(0, 8, 8, 306, 203)
For i = 1 To 4 + Random(5)
AddGadgetItem(0, - 1, "Panel " + Str(i))
Next i
ButtonGadget(2, 10, 15, 80, 24, "Button 1")
ButtonGadget(3, 95, 15, 80, 24, "Button 2")
CloseGadgetList()
SetWindowLong_(GadgetID(0), #GWL_STYLE, GetWindowLong_(GadgetID(0), #GWL_STYLE) | #TCS_BOTTOM)
Repeat
pgStatic = 0
For i = 1 To CountGadgetItems(0)
pgStatic = FindWindowEx_(hPgad, pgStatic, "Static", 0)
MoveWindow_(pgStatic, 0, 0, 260, 180, 1)
Next i
Until WaitWindowEvent()=#PB_Event_CloseWindow
EndIf