Sub Class_Globals
Private Root As B4XView
Private xui As XUI
Private EditText1 As B4XView
End Sub
Private Sub B4XPage_Created (Root1 As B4XView)
Root = Root1
Root.LoadLayout("MainPage")
EditText1.SetColorAndBorder(EditText1.Color, 2dip, xui.Color_Blue, 0)
End Sub