[B4X] [XUI] AS Settings
Introducing a new library that allows you to create your own settings page with minimal code. This library comes equipped with automatic saving and loading features, making it incredibly easy to manage your settings. It supports booleans, free text, numbers, comboboxes, action buttons and more...
www.b4x.com
This property is for text input. Normal text, numbers or decimal numbers.
Example
B4X:
'Numeric Example
AS_Settings1.MainPage.AddProperty_Text("Advanced","PropertyName_9","Text Example","",Null,"Test",100dip,AS_Settings1.InputType_Text)
AS_Settings1.MainPage.AddProperty_Text("Advanced","PropertyName_10","Numeric Example","",Null,24,60dip,AS_Settings1.InputType_Numeric)
AS_Settings1.MainPage.AddProperty_Text("Advanced","PropertyName_11","Decimal Example","",Null,24.24,100dip,AS_Settings1.InputType_Decimal)
AS_Settings1.InputType_...
enumeration, you specify which format the user may enter.
B4X:
AS_Settings1.InputType_Text
AS_Settings1.InputType_Numeric
AS_Settings1.InputType_Decimal
If the user changes the text, the ValueChanged event is triggered.
B4X:
Private Sub AS_Settings1_ValueChanged(Property As AS_Settings_Property, Value As Object)
'Log("ValueChanged " & Property.PropertyName & ": " & Value)
Select Property.PropertyName
Case "PropertyName_9", "PropertyName_10", "PropertyName_11"
Log(Value)
End Select
End Sub