Функция TabBarGadget

TabBarGadget

Создаёт гаджет подобный PanelGadget, но с продвинутыми возможностями.

TabBarGadget(Gadget.i, X.i, Y.i, Width.i, Height.i, Attributes.i, Window.i)

Параметры

Gadget	Идентификатор гаджета
X	x-координата гаджета
Y	y-координата гаджета
Width	Ширина гаджета
Height	Высота гаджета
Attributes	Параметры: #TabBarGadget_CloseButton - показывает кнопку закрытия на вкладках #TabBarGadget_SelectedCloseButton - показывает кнопку закрытия только на выбранной вкладке #TabBarGadget_CheckBox - показывает чекбокс (флажок/галку) на вкладке
Window	Идентификатор родительского окна

Возвращаемое значение

Успех:	Возвращает аналогично гаджетам PureBasic - не 0, если успешно. При #PB_Any возвращает идентификатор гаджета.
Ошибка:	0

Примечания

По факту создаёт CanvasGadget, чтобы рисовать в нём вкладки.
Большинство функций TabBarGadget одинаковы с PanelGadget по набору параметров, поэтому при переходе с одного на другой даже переделывать не придётся кроме названий.
Смотрите демоверсию на странице модуля.
Для элементов используется ContainerGadget(), в этом случае можно скрыть одни элементы и показать другие при переключении вкладок.

См. также

AddTabBarGadgetItem, FreeTabBarGadget,

Пример

EnableExplicit
; https://www.purebasic.fr/english/viewtopic.php?t=47588
XIncludeFile "TabBarGadget.pbi"
#Window = 0
#Gadget_TabBar = 0
Define i, ww, hw, PnTabHeight
ww = 320
hw = 200
If OpenWindow(#Window, 0, 0, ww, hw, "TabBarGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    TabBarGadget(#Gadget_TabBar, 0, 0, ww, 26, #TabBarGadget_None, #Window)
    For i = 0 To 9
        AddTabBarGadgetItem(#Gadget_TabBar, i, Str(i))
    Next
    PnTabHeight = GadgetHeight(#Gadget_TabBar) ; предварительный оценочный размер
    ContainerGadget(#PB_Any, 0, PnTabHeight, ww, hw - PnTabHeight, #PB_Container_Flat)
    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf