Dear all.
Greetings,
I need to set values for certain item in CLV, how?
the following part of code but not work right.
B4X:
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
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.
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
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
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
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...