' create the input fields for the content
Dim inp1 As ABMInput
inp1.Initialize(AppPage, "username", ABM.INPUT_TEXT, "", False, "LoginInput")
inp1.IconName = "mdi-action-account-circle"
inp1.RemoveBottomLine = True
inp1.HTMLAddClass("roundedinput") ' <-----------------
inp1.Narrow = True
myLoginContainer.Cell(2,1).AddComponent(inp1)
myLoginContainer.Cell(2,1).PaddingRight = "30px"
myLoginContainer.Cell(2,1).SetExtraClasses(" roundedParent ") ' <-------------- spaces here are important!
Dim inp2 As ABMInput
inp2.Initialize(AppPage, "password", ABM.INPUT_PASSWORD, "", False, "LoginInput")
inp2.IconName = "mdi-action-lock"
inp2.RemoveBottomLine = True
inp2.Narrow = True
inp2.HTMLAddClass("roundedinput") ' <-----------------
myLoginContainer.Cell(3,1).AddComponent(inp2)
myLoginContainer.Cell(3,1).PaddingRight = "30px"
myLoginContainer.Cell(3,1).SetExtraClasses(" roundedParent ") ' <-------------- spaces here are important!