I have a xCustomListView and i add a panel with many label.
When I click on a label or panel, I want to change value of many label at same time.
Can you point the way to solve this
When I click on a label or panel, I want to change value of many label at same time.
B4X:
clvMessagesClients.Add(Create_plainte(idplainte, laPlainte, adresse, telephone, ladateetheure),1)
Sub Create_plainte(id As Int, plainte As String, adresse As String, telephone As String, dateheure As Long) As Panel
Dim p As Panel
p.Initialize("")
p.SetLayout(0, 0, pnlMessagesClients.Width -30dip , 100dip)
p.LoadLayout("createmessageclient")
p.Height=lblMessageClient.Height+lblMessageClient.top+4dip
lblAdresse.Text = adresse
lblTelephone.Text=telephone
lblMessage.text=plainte
Return p
End Sub
Sub lblMessage_Click
Dim lbl As Label
lbl=Sender
' I can change only lbl
' I need to change lblMessage2 text too.
lbl.TextColor=Colors.Green
lbl.Text=Chr(0x0f046)
lblMessage2.Text=Chr(0xf0e0)
End Sub
Can you point the way to solve this