Dim store1 As MashAppStore
store1.Initialize(page,"apple",MashPlugIns.EnumThemes.warn)
page.Cell(2,1).AddComponent(store1.ABMComp)
Dim store2 As MashAppStore
store2.Initialize(page,"google",MashPlugIns.EnumThemes.danger)
store2.MyStore = store1.EnumStore.google
page.Cell(2,1).AddComponent(store2.ABMComp)
and trap your events with
B4X:
Sub store_click(value As Map)
Dim valuex As String = value.Get("value")
page.Msgbox("",valuex,"","OK",False,"","")
End Sub