Android Question B4X pages - designing your own title bar

'B4X page "p2"
Sub Class_Globals
    Private Root As B4XView 'ignore
    Private xui As XUI 'ignore
    Private BBLabel1 As BBLabel
    Private TextEngine1 As BCTextEngine
End Sub

'You can add more parameters here.
Public Sub Initialize As Object
    Return Me
End Sub

'This event will be called once, before the page becomes visible.
Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    Root.LoadLayout("BBLabel")
    Sleep(100)
    TextEngine1.Initialize(Root)
    BBLabel1.TextEngine = TextEngine1
    BBLabel1.Text = $"[b][u]BBLabel[/u][/b]: [color=red]Red[/color] [color=0xFF08B31F]Green[/color] [color=blue]Blue[/color]"$
End Sub