B4J Library [ABMaterial]: MashInfoBox

Discussion in 'B4J Libraries & Classes' started by Mashiane, Dec 21, 2017.

  1. Mashiane

    Mashiane Expert Licensed User

    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'

    Code:
    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...

    Code:
    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)
     
    joulongleu likes this.
Loading...
  1. This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
    By continuing to use this site, you are consenting to our use of cookies.
    Dismiss Notice