Sub SetPadding(tf As TextField, PaddingLeft As Float, PaddingRight As Float)
Dim pnlLeft As B4XView = XUI.CreatePanel("")
pnlLeft .SetLayoutAnimated(0, 0, 0, PaddingLeft , tf.Height)
Dim pnlRight As B4XView = XUI.CreatePanel("")
pnlRight .SetLayoutAnimated(0, 0, 0, PaddingRight, tf.Height)
Dim no As NativeObject = tf
no.SetField("leftView", pnlLeft )
no.SetField("leftViewMode", 3)
no.SetField("rightView", pnlRight)
no.SetField("rightViewMode", 3)
End Sub