Android Question (RESOLVE) AS_Properties [Ljava.lang.Object;@51ea6a7

[sigster]

Hi

I am try to save AS_Properties when I read it back I get this [Ljava.lang.Object;@51ea6a7

and when I try to go to settings it crash

    If AS_Properties.GetProperty("SingleSelect_ut")=Null Then
        AS_Properties.PutProperty("SingleSelect_ut",Array As String("Hvítur"))
    Else
    End If   
    
    Log(AS_Properties.GetProperty("SingleSelect_ut"))



    

    AS_Settings1.MainPage.AddGroup("Group1","Theme")
    AS_Settings1.MainPage.AddProperty_Action("Group1","SingleSelect_ut","Theme litur","",Null,AS_Settings1.CreateList(Array("Hvítur")))
    
    Dim lst_Items As List
    lst_Items.Initialize
    lst_Items.Add(AS_Settings1.CreateSelectionListItem("Hvítur",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_RGB(255,255,255)),"Hvítur"))
    lst_Items.Add(AS_Settings1.CreateSelectionListItem("Dökkur",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_RGB(84, 93, 110)),"Dökkur"))
    
    Page_SingleSelect.Initialize(AS_Settings1,"Veldu lit")
    Page_SingleSelect.AddGroup("Group1","")
    Page_SingleSelect.AddProperty_SelectionList("Group1","SingleSelect_ut",lst_Items,Array("Hvítur"),False,False)

as_settingspage_addproperty_selectionlist (java line: 1885)
java.lang.ClassCastException: java.lang.Object[] cannot be cast to java.util.List
    at b4a.tengi.as_settingspage._addproperty_selectionlist(as_settingspage.java:1885)
    at b4a.tengi.b4xstillingar._b4xpage_created(b4xstillingar.java:709)
    at b4a.tengi.b4xstillingar.callSub(b4xstillingar.java:774)
    at anywheresoftware.b4a.keywords.Common.CallSub4(Common.java:1151)
    at anywheresoftware.b4a.keywords.Common.CallSubNew2(Common.java:1122)
    at b4a.tengi.b4xpagesmanager._createpageifneeded(b4xpagesmanager.java:531)
    at b4a.tengi.b4xpagesmanager._showpage(b4xpagesmanager.java:868)
    at b4a.tengi.b4xpages._showpage(b4xpages.java:123)
    at b4a.tengi.b4xmainpage._b4xpage_menuclick(b4xmainpage.java:664)
    at java.lang.reflect.Method.invoke(Native Method)
    at anywheresoftware.b4a.BA.raiseEvent2(BA.java:221)
    at anywheresoftware.b4a.BA$1.run(BA.java:360)
    at android.os.Handler.handleCallback(Handler.java:995)
    at android.os.Handler.dispatchMessage(Handler.java:103)
    at android.os.Looper.loopOnce(Looper.java:273)
    at android.os.Looper.loop(Looper.java:363)
    at android.app.ActivityThread.main(ActivityThread.java:10060)
    at java.lang.reflect.Method.invoke(Native Method)
    at com.android.internal.os.RuntimeInit$MethodAndArgsCaller.run(RuntimeInit.java:632)
    at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:975)

 

[sigster]

I did ask gemini problem solved

    Dim lst_Items As List
    lst_Items.Initialize
    lst_Items.Add(AS_Settings1.CreateSelectionListItem("Hvítur",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_RGB(255,255,255)),"Hvítur"))
    lst_Items.Add(AS_Settings1.CreateSelectionListItem("Dökkur",AS_Settings1.FontToBitmap(Chr(0xF111),False,30,xui.Color_RGB(84, 93, 110)),"Dökkur"))
    
    Page_SingleSelect.Initialize(AS_Settings1,"Veldu lit")
    Page_SingleSelect.AddGroup("Group1","")
    Page_SingleSelect.AddProperty_SelectionList("Group1","SingleSelect_ut",lst_Items,AS_Settings1.CreateList(Array("Hvítur")),False,False)


    If AS_Properties.GetProperty("SingleSelect_ut") = Null Then
        Dim L As List = Array("Hvítur")
        AS_Properties.PutProperty("SingleSelect_ut", L)
    End If