[B4X] [XUI] AS SegmentedTab
New year, new ASViews :) I spend a lot of time in creating views, like this and to create a high quality view cost a lot of time. If you want to support me and further views, then you can do it here by Paypal or with a coffee. :) NEW PaddingSelectionPanel - Picture Value: 5 NEW...
www.b4x.com
B4X:
ASSegmentedTab3.mBase.Color = xui.Color_ARGB(255,42, 156, 255)
ASSegmentedTab3.SelectionPanel.Color = xui.Color_White
ASSegmentedTab3.ItemTextProperties.TextColor = xui.Color_Black
ASSegmentedTab3.ItemTextProperties.SelectedTextColor = xui.Color_Black
ASSegmentedTab3.CornerRadiusBackground = 8dip
ASSegmentedTab3.CornerRadiusSelectionPanel = 8dip
ASSegmentedTab3.PaddingSelectionPanel = 4dip
'*********CustomTab************
Dim Tab1 As ASSegmentedTab_Tab
Tab1.Initialize
Tab1.Icon = ASSegmentedTab3.FontToBitmap(Chr(0xE068),True,15,xui.Color_White)
Tab1.Width = 40dip
ASSegmentedTab3.AddTabAdvanced(Tab1)
ASSegmentedTab3.AddTab("Inizio",Null)
ASSegmentedTab3.AddTab("Fine Prova",Null)