Yes find and tried that but the collor did not changes i only got a new titlebar.
Dim Textcolor1 As Int = Colors.RGB(245,168,73)
Activity.LoadLayout("Test") 'Replace with your layout
Activity.Title = "Volvomann"
Activity.TitleColor = Textcolor1