Hi there
The name says it all, an information box for your dashboards..
Coming soon to MashPlugIns
Trapping the infobox events, the property ArrayName has been set to 'infobox'
These are the variants per youtube above...
The name says it all, an information box for your dashboards..
Coming soon to MashPlugIns
Trapping the infobox events, the property ArrayName has been set to 'infobox'
B4X:
Sub infobox_click(value As Map)
Dim valuex As String = value.Get("value")
page.Msgbox("",valuex,"","OK",False,"","")
End Sub
These are the variants per youtube above...
B4X:
Dim mib As MashInfoBox
mib.Initialize(page,"mib",MashPlugIns.MaterialIcons.mdi_shopping_cart,"NEW ORDERS","125",12,3,3,MashPlugIns.EnumThemes.danger)
mib.Animated = True
'page.cell(2,1).AddComponent(mib.ABMComp)
Dim mib1 As MashInfoBox
mib1.Initialize(page,"mib1",MashPlugIns.MaterialIcons.mdi_face,"NEW MEMBERS","257",12,3,3,MashPlugIns.EnumThemes.warn)
mib1.Animated = True
'page.cell(2,1).AddComponent(mib1.ABMComp)
Dim mib2 As MashInfoBox
mib2.Initialize(page,"mib2",MashPlugIns.MaterialIcons.mdi_bookmark,"BOOKMARKS","117",12,3,3,MashPlugIns.EnumThemes.success)
mib2.Animated = True
'page.cell(2,1).AddComponent(mib2.ABMComp)
'
Dim mib3 As MashInfoBox
mib3.Initialize(page,"mib3",MashPlugIns.MaterialIcons.mdi_favorite,"LIKES","1432",12,3,3,MashPlugIns.EnumThemes.info)
mib3.Animated = True
'page.cell(2,1).AddComponent(mib3.ABMComp)
'HoverZoom
Dim mib4 As MashInfoBox
mib4.Initialize(page,"mib4",MashPlugIns.MaterialIcons.mdi_email,"EMAIL","15",12,3,3,MashPlugIns.EnumThemes.danger)
mib4.HoverZoom = True
'page.cell(2,1).AddComponent(mib4.ABMComp)
Dim mib5 As MashInfoBox
mib5.Initialize(page,"mib5",MashPlugIns.MaterialIcons.mdi_devices,"CPU USAGE","92%",12,3,3,MashPlugIns.EnumThemes.warn)
mib5.HoverZoom = True
'page.cell(2,1).AddComponent(mib5.ABMComp)
Dim mib6 As MashInfoBox
mib6.Initialize(page,"mib6",MashPlugIns.MaterialIcons.mdi_access_alarm,"ALARM","2:50 PM",12,3,3,MashPlugIns.EnumThemes.success)
mib6.HoverZoom = True
'page.cell(2,1).AddComponent(mib6.ABMComp)
Dim mib7 As MashInfoBox
mib7.Initialize(page,"mib7",MashPlugIns.MaterialIcons.mdi_gps_fixed,"LOCATION","East London, RSA",12,3,3,MashPlugIns.EnumThemes.info)
mib7.HoverZoom = True
'page.cell(2,1).AddComponent(mib7.ABMComp)
'Hoverexpand
Dim mib8 As MashInfoBox
mib8.Initialize(page,"mib8",MashPlugIns.MaterialIcons.mdi_equalizer,"RATE","62%",12,3,3,MashPlugIns.EnumThemes.tealbc)
mib8.HoverExpand = True
'page.cell(2,1).AddComponent(mib8.ABMComp)
Dim mib9 As MashInfoBox
mib9.Initialize(page,"mib9",MashPlugIns.MaterialIcons.mdi_flight_takeoff,"FLIGHT","06:00 AM",12,3,3,MashPlugIns.EnumThemes.greenbc)
mib9.HoverExpand = True
'page.cell(2,1).AddComponent(mib9.ABMComp)
MashPlugIns.AddTheme("rw","red","","white","")
Dim mib10 As MashInfoBox
mib10.Initialize(page,"mib10",MashPlugIns.MaterialIcons.mdi_battery_charging_full,"BATTERY","CHARGING",12,3,3,MashPlugIns.EnumThemes.lightgreenbc)
mib10.HoverExpand = True
mib10.IconTheme = "rw"
'page.cell(2,1).AddComponent(mib10.ABMComp)
Dim mib11 As MashInfoBox
mib11.Initialize(page,"mib11",MashPlugIns.MaterialIcons.mdi_brightness_low,"BRIGHTNESS","40%",12,3,3,MashPlugIns.EnumThemes.limebc)
mib11.HoverExpand = True
mib11.ThemeContent = True
'page.cell(2,1).AddComponent(mib11.ABMComp)