Hi
How can I PutProperty, if I try it like this I get error when I go to settings and the app crash
Regards
sigster
How can I PutProperty, if I try it like this I get error when I go to settings and the app crash
B4X:
AS_Properties.PutProperty("SingleSelect","Green")
B4X:
java.lang.ClassCastException: java.lang.String cannot be cast to java.util.List
B4X:
AS_Settings1.MainPage.AddGroup("Group1","Listview text volor")
AS_Settings1.MainPage.AddProperty_Action("Group1","SingleSelect","Color","",Null,AS_Settings1.CreateList(Array("Green")))
Page_SingleSelect.Initialize(AS_Settings1,"Color")
Page_SingleSelect.AddGroup("Group1","Color")
'************Items********************
Dim lst_Items As List
lst_Items.Initialize
lst_Items.Add(AS_Settings1.CreateSelectionListItem("Green",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_RGB(45, 136, 121)),"Green"))
lst_Items.Add(AS_Settings1.CreateSelectionListItem("Blue",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_RGB(73, 98, 164)),"Blue"))
lst_Items.Add(AS_Settings1.CreateSelectionListItem("Red",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_RGB(221, 95, 96)),"Red"))
lst_Items.Add(AS_Settings1.CreateSelectionListItem("Purple",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_RGB(141, 68, 173)),"Purple"))
lst_Items.Add(AS_Settings1.CreateSelectionListItem("Magenta",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_Magenta),"Magenta"))
lst_Items.Add(AS_Settings1.CreateSelectionListItem("Cyan",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_Cyan),"Cyan"))
'************Single Select************
Page_SingleSelect.AddProperty_SelectionList("Group1","SingleSelect",lst_Items,Array("Green"),False,False)Regards
sigster