Hii experts,
My custom view Label class is working fine.
I add custom view label object in custom list view by add row function.
But customlistview_itemclick event is not running when I click on custom view.
Here is my code of custom cllick event
B4X:
Private Sub mBase_Click
Log(mCallBack)
Log(mEventName)
If SubExists(mCallBack,mEventName & "_Click") Then
CallSub(mCallBack,mEventName & "_Click")
End If
End Sub
Code: Private Sub mBase_Click Log(mCallBack) Log(mEventName) If SubExists(mCallBack,mEventName & "_Click") Then CallSub(mCallBack,mEventName & "_Click") EndIf
End Sub
Private Sub mBase_Click Log(mCallBack) Log(mEventName) If SubExists(mCallBack,mEventName & "_Click") Then CallSub(mCallBack,mEventName & "_Click") EndIf
End Sub
uploaded my code here. In this I added two object one is my custom object and other default b4a object.
in customlistview.
Problem : when I click on b4a default object it run event customlistview_click,
but when I click on my custom object customlistview_click is not running.
Add this routine to the Main (in your project you attached in #9):
B4X:
Sub blabel1_Click
Dim lb As blabel = Sender
Dim index As Int = CustomListView1.GetItemFromView(lb.GetBase)
Dim Value As Object = CustomListView1.GetValue(index)
LogColor("bLabel1_Click", Colors.Blue)
LogColor("Index: " & index, Colors.Blue)
LogColor("Value " & Value, Colors.Blue)
Msgbox(Value,"")
End Sub
(to better test the project you could change also:
CustomListView1.Add(add_row("custom view","default view"),a)
to
CustomListView1.Add(add_row("custom view","default view"), i)
)