Dim gr As GradientDrawable
Dim Cols(2) As Int
Dim ModePanelLbl As Label
ModePanelLbl.Initialize("")
ModePanel.AddView(ModePanelLbl,7dip,6dip,20dip,20dip)
Cols(0) = Colors.RGB(150,150,150) ' Grayish Label
Cols(1) = Colors.RGB(50,50,50)
gr.Initialize("TL_BR", Cols)
gr.CornerRadius = 5dip
ModePanelLbl.Background = gr
ModePanelLbl.TextColor = Colors.White
ModePanelLbl.BringToFront