Sub Globals
Private CustomList As CustomListView
Private CardView As CardView 'I believe in the designer LayoutCellItem
Dim STR As AHSwipeToRefreshMulti 'I believe in the designer LayoutMain
Private PanelListView As Panel
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("LayoutMain")
PanelListView.Initialize("")
CustomList.Initialize("","CustomList")
PanelListView.AddView(CustomList.AsView,0,0,100%x,100%y)
STR.AddView(PanelListView)
End Sub