If I have this code that shows that the clickable item index is i, how do you extract the text which is: Item &i in the Cs_Click sub
B4X:
For i = 1 To 10
Dim cs As CSBuilder
cs.Initialize.Underline.Append("test " & i).Color(xui.Color_Blue).Clickable("cs", i).PopAll
Dim item As CLVTreeItem = Tree.AddItem(Tree.Root, cs, Null, "")
B4X:
Private Sub cs_Click (Tag As Object)
Log("cs click: " & Tag)
'How do you get the item text here is my question
End Sub
cs.Initialize.Underline.Append("test " & i).Color(xui.Color_Blue).Clickable("cs", Array(i, "anything else you want here")).PopAll
Private Sub cs_Click (Tag As Object)
Dim o() As Object = Tag
Dim index As Int = o(0)
Dim AnythingElse As String = o(1)
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.