iOS Question iTabstrip - Change background color of the selected label?

[Sviluppatori Liceo Giovio]

Is it possible to change the background color of the label corresponding to the currently selected page in the _Pageselected event?
I do it in B4A using this code:

Dim i As Int
    For Each lbl As Label In GetAllTabLabels(TabStrip1)
        If i = Position Then
            lbl.SetColorAnimated(200, AccentColor, Colors.RGB(15,105,255))
        Else
            lbl.Color = AccentColor
        End If
        i = i + 1
    Next

Where getalltablabels is

Public Sub GetAllTabLabels (tabstrip As TabStrip) As List
    Dim jo As JavaObject = tabstrip
    Dim r As Reflector
    r.Target = jo.GetField("tabStrip")
    Dim tc As Panel = r.GetField("tabsContainer")
    Dim res As List
    res.Initialize
    For Each v As View In tc
        If v Is Label Then res.Add(v)
    Next
    Return res
End Sub

 

[Erel]

https://www.b4x.com/android/forum/threads/change-tabstrip-label-color-when-focus.85216/#post-539866

 

[Sviluppatori Liceo Giovio]

https://www.b4x.com/android/forum/threads/change-tabstrip-label-color-when-focus.85216/#post-539866

I also saw that thread, but it changes the label's text color, not the background color.
I tried changing lbl.color, but to no avail.

 

[Erel]

I also saw that thread

Worth posting the link next time as it is relevant (took me a while to find it).

You can use cs.BackgroundColor to change the text background color.

 

[Sviluppatori Liceo Giovio]

Worth posting the link next time as it is relevant (took me a while to find it).

You can use cs.BackgroundColor to change the text background color.

I'll keep that in mind for next time. Thanks.

 

[Sviluppatori Liceo Giovio]

Apologies for the necro, but it doesn't appear to work. Here's the code I'm using.

Sub TabStrip1_PageSelected (Position As Int)
    Log($"Current page: ${Position}"$)
    Dim i As Int

   
    For i = 0 To TabPages.Size - 1
       
        Dim p As Page = TabPages.Get(i)
        Dim lbl As Label = p.TitleView
        Log(lbl.AttributedText.ToString)
       
        Dim clr As Int
        Dim cs As CSBuilder
        If i = Position Then
            SetAttributedTitle(p, cs.Initialize.BackgroundColor(Colors.RGB(15,105,255)).Color(Colors.White).Append(lbl.AttributedText.ToString).PopAll)
        Else
            SetAttributedTitle(p, cs.Initialize.BackgroundColor(AccentColor).Color(Colors.White).Append(lbl.AttributedText.ToString).PopAll)
        End If
       
       
       
    Next
End Sub

 

[Erel]

You are missing parts of the code.

https://www.b4x.com/android/forum/threads/change-tabstrip-label-color-when-focus.85216/#post-539866

 

[Sviluppatori Liceo Giovio]

Well I'm dumb. Thanks. Is there a way to make the label's background fit the entire "section" of the tabstrip it has assigned?
I've attached a screenshot to show what I'm talking about.

 

[Erel]

Try to change the label color instead of using attributed string.

 

[Sviluppatori Liceo Giovio]

Nothing seems to happen.

 

[Erel]

It might be impossible to change it like you want.