hi, i need a Listview. I use xCustomListView.
Call the Sub with.
In this called sub i add the Values:
it works, but the Click Event is not rised??
Call the Sub with.
B4X:
Services.ExecuteListView(lbl_vomBerg.Text,Starter.Liste_Berge,ListView_vBerg)
In this called sub i add the Values:
B4X:
Sub ExecuteListView(varSearch As String, Tabelle As List, Listview_Service As CustomListView)
Loggen.cl("Execute List View, Main: " & varSearch)
Dim varCols, varColsUp As String
Listview_Service.Clear
For i = 0 To Tabelle.Size - 1 'simple begrenzung mit min funktioniert nicht, da auch die Berge drauf zugreifen
varCols = Tabelle.Get(i)
varColsUp=varCols.ToUpperCase
If varColsUp.Contains(varSearch.ToUpperCase) Then Listview_Service.AddTextItem(varCols,varCols)
Next
End Sub
it works, but the Click Event is not rised??