Android Question How to set values of items inside CLV ?

[Adamdam]

Dear all.
Greetings,
I need to set values for certain item in CLV, how?
the following part of code but not work right.

Sub Globals
    Private CLV1                As CustomListView
End Sub

Sub Activity_Create(FirstTime As Boolean)   
    Activity.LoadLayout  ("1")
End Sub

Private Sub Update_Click
    Dim i  As Int
    Try
        Dim SmallPanel As Panel
        Dim SmallLable As Label       
        For i=2 To 4    'CLV1.Size-1
            SmallPanel = CLV1.GetPanel(i)
            SmallLable = SmallPanel.GetView(1)
            SmallLable.Text = "Value : " & i
        Next
    Catch
        ToastMessageShow ( LastException, True)
    End Try
End Sub

Any help please,
Thanks on advance for any help
Best regards

 

[Jeffrey Cameron]

It's going to be impossible for anyone here to help you unless you specify what error you are getting, or if no error what behavior is happening that is unexpected to you.

 

[Daestrum]

Try puting the Dim panel and Dim label inside the loop.

I would guess all the labels ended up showing 'Value 4"

 

[Adamdam]

Dear Mr. Jeffrey :
The error message is as :
java.lang.RuntimeException: Object should first be initialized (View).

thanks Mr. Daestrum :
I made (puting the Dim panel and Dim label inside the loop.) but not work

 

[Daestrum]

Sorry I should have been clearer

    Try
        For i=2 To 4    'CLV1.Size-1
            Dim SmallPanel As Panel = CLV1.GetPanel(i)
            Dim SmallLable As Label = SmallPanel.GetView(1)
            SmallLable.Text = "Value : " & i
        Next
    Catch
        ToastMessageShow ( LastException, True)
    End Try

 

[Adamdam]

Sorry I should have been clearer

    Try
        For i=2 To 4    'CLV1.Size-1
            Dim SmallPanel As Panel = CLV1.GetPanel(i)
            Dim SmallLable As Label = SmallPanel.GetView(1)
            SmallLable.Text = "Value : " & i
        Next
    Catch
        ToastMessageShow ( LastException, True)
    End Try

I tested it, it still not run and gave same error

 

[Jeffrey Cameron]

Assuming you have at some point loaded items into the CLV1, is your label the 2nd view contained in your panel? The line

Dim SmallLable As Label = SmallPanel.GetView(1)

will load the second view contained in the "SmallPanel" panel.

 

[Adamdam]

I work on this example :

Cards list with CustomListView

This example uses xCustomListView to implement a list of cards. As the items layout is created with the designer, it is simple to implement any layout you like. You can also combine different types of items in the same list. The divider color and pressed color are set to transparent. The items...

www.b4x.com

Just I need to modify label "This is item #." into different values in the running say after click in any button.
Best regards

 

[Adamdam]

I got solution, thanks Mr. Jeffrey

this is the solution with minor modifications.

CustomListView ReplaceAt

Ho un problema con: clw.ReplaceAt(CLWTextPositionId, clw.GetPanel(CLWTextPositionId), strUtil.MeasureMultilineTextHeight(CLWlbl,CLWlbl.Text)*1.3, Text) CLWTextPositionId contiene la riga esatta dove ho scritto il testo ovvero devo riscrivere del testo nella posizione esatta dove era stato...

www.b4x.com

Best regards