Android Question List of ToggleButtons

lip said:

When i do this:

Code:

        Dim tbtnList As List
        tbtnList.Initialize
        tbtnList.AddAll(Array As ToggleButton (tbtn_EnOceanTopLeft,tbtn_EnOceanTopRight,tbtn_EnOceanBottomLeft,tbtn_EnOceanBottomRight))
        For Each tbtn As ToggleButton In tbtnList
        ...
        Next

I get this on execution of the "For Each..." line:

Log:

java.lang.ClassCastException: anywheresoftware.b4a.objects.CompoundButtonWrapper$ToggleButtonWrapper cannot be cast to android.widget.ToggleButton

Click to expand...

    Dim tbtnList As List
    tbtnList.Initialize
    tbtnList.AddAll(Array As Object (tbtn_EnOceanTopLeft,tbtn_EnOceanTopRight,tbtn_EnOceanBottomLeft,tbtn_EnOceanBottomRight))
    For Each tbtn As ToggleButton In tbtnList
        Log(tbtn.Enabled)
    Next

mangojack said:

Should be Array As Object

Click to expand...

LucaMs said:

Yes but... why?

Click to expand...

'    Dim tbtnList As List
'    tbtnList.Initialize
''    tbtnList.AddAll(Array As ToggleButton (tbtn_EnOceanTopLeft,tbtn_EnOceanTopRight,tbtn_EnOceanBottomLeft,tbtn_EnOceanBottomRight))
'    tbtnList.Add(tbtn_EnOceanTopLeft)
'    tbtnList.Add(tbtn_EnOceanTopRight)
'    tbtnList.Add(tbtn_EnOceanBottomLeft)
'    tbtnList.Add(tbtn_EnOceanBottomRight)
'    For Each tbtn As ToggleButton In tbtnList
'        Log(tbtn.Enabled)
'    Next
    
'This works!
    Dim arrToggleButtons(4) As ToggleButton
    arrToggleButtons(0) = tbtn_EnOceanTopLeft
    arrToggleButtons(1) = tbtn_EnOceanTopRight
    arrToggleButtons(2) = tbtn_EnOceanBottomLeft
    arrToggleButtons(3) = tbtn_EnOceanBottomRight
    For Each tbtn As ToggleButton In arrToggleButtons
        Log(tbtn.Enabled)
    Next