Where is the code to add the CustomListView?
(lbl can be a name for a label. edt should be better)
Dim L As List
L.Initialize
For i = 0 To cv.GetSize - 1
Dim pnl As Panel = cv.GetPanel(i)
Dim chk As CheckBox = pnl.GetView(0)
If chk.Checked Then
L.Add(i)
End If
Next
Perfect, now I have the same problem in my project.
If the CustomListView is created inside the Activity_Create, there is no problems with GetItemFromView called in the TextChanged event of an EditText added to a custom item.
If it is created after the Activity_Create is completed (pressing a button, for example) the TextChanged event will raise during the creation of the CustomListView and GetItemFromView gets a null parent.
[My CLV is not added using the Designer]
could you please give me a link to the documentation realated to your list class. Actually I am looking for a list view which can hold name and small picture of the person. something similar to contacts listMy mistake. I forgot to mention that you need the latest Reflection library.
clvMaster.InsertAt(ScrolledChannel, CreateChannelListMaster(ScrolledChannel, clvMasterCh.AsView.Width, 167dip, Channels(ScrolledChannel,3), Channels(ScrolledChannel,2), EPGs(ScrolledChannel,0), EPGs(ScrolledChannel,1), EPGs(ScrolledChannel,2), EPGs(ScrolledChannel,3)), 167dip, ScrolledChannel)
'UPDATE - EPG
lblEPGName.Text = EPGs(ScrolledChannel,0)
lblEPGStart.Text = EPGs(ScrolledChannel,1).SubString2(11, 16)
lblEPGStop.Text = EPGs(ScrolledChannel,2).SubString2(11, 16)
lblEPGDesc.Text = EPGs(ScrolledChannel,3)
Sub UpdateItemsAtPanel(Index As Int, Pnl As Panel, ItemHeight As Int, Value As Object, lblEPGName, lblEPGStart, lblEPGStop, lblEPGDesc As String)
'UPDATE - EPG
panel(index).lblEPGName.Text = lblEPGName
panel(index).lblEPGStart.Text = lblEPGStart
panel(index).lblEPGStop.Text = lblEPGStart
panel(index).lblEPGDesc.Text = lblEPGDesc
End Sub
This is not the correct place for this question.
Sub clv2_ItemClick(Index As Int, Value As Object)
Dim pnlnew As Panel
Dim newvalue As Object
newvalue = Value
pnlnew= clv2.GetPanel(Index)
clv2.RemoveAt(Index)
clv2.InsertAt(Index,pnlnew,200dip,newvalue)
Log(Index & " = " & Value)
End Sub
Sub clv2_ItemClick(Index As Int, Value As Object)
Dim newvalue As Object
newvalue = Value
pnlnew= clv2.GetPanel(Index)
clv2.RemoveAt(Index)
clv2.InsertAt(Index,CreateListItem($"Item #${Index+1}"$, clv2.AsView.Width, 100dip),200dip,newvalue)
Log(Index & " = " & Value)
End Sub
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?