Page 1 of 1
PanelGadget FixedWidth & Spacing
Posted: Tue Aug 14, 2012 12:42 am
by SoFlawLess_
Hi, I'm trying to make every tab on my PanelGadget the same width ... I've tried using #TCS_FIXEDWIDTH but all it does it not show the tabs.
Also, is it possible to increase the vertical spacing between the tab and the panel?
Re: PanelGadget FixedWidth & Spacing
Posted: Tue Aug 14, 2012 1:19 am
by IdeasVacuum
Re: PanelGadget FixedWidth & Spacing
Posted: Tue Aug 14, 2012 3:22 am
by RASHAD
Code: Select all
TWidth = 80
THeight = 25
If OpenWindow(0, 0, 0, 322, 220, "PanelGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
PanelGadget (0, 8, 8, 306, 203)
AddGadgetItem (0, -1, "Panel 1")
PanelGadget (1, 5, 5, 290, 166)
AddGadgetItem(1, -1, "Sub-Panel 1")
AddGadgetItem(1, -1, "Sub-Panel 2")
AddGadgetItem(1, -1, "Sub-Panel 3")
CloseGadgetList()
SetWindowLong_(GadgetID(1), #GWL_STYLE, GetWindowLong_(GadgetID(1), #GWL_STYLE) | #TCS_FIXEDWIDTH)
SendMessage_(GadgetID(1), #TCM_SETITEMSIZE, 0, TWidth|THeight<<16)
AddGadgetItem (0, -1,"Panel 2")
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_FIXEDWIDTH)
SendMessage_(GadgetID(0), #TCM_SETITEMSIZE, 0, TWidth|THeight<<16)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf