Example: template.json
{
"Version": 1.1,
"Theme": "Light Theme",
"Items": [
...
{
"title": "Email",
"type": "Text", --------------------------------- If pi.ItemType = PrefDialog.TYPE_TEXT Then
"key": "Email",
"required": false
},
{
"title": "Description",
"type": "Memo", --------------------------------- If pi.ItemType = PrefDialog.TYPE_MULTILINETEXT Then
"key": "Description",
"required": false
}
Dim sf As Object = PrefDialog.ShowDialog(Item, "OK", Maps.L(23,"CANCEL"))
For i = 0 To PrefDialog.PrefItems.Size - 1
Private pi As B4XPrefItem = PrefDialog.PrefItems.Get(i)
If pi.ItemType = PrefDialog.TYPE_TEXT Then
Else If pi.ItemType = PrefDialog.TYPE_MULTILINETEXT Then
end if
Next