Application Drawer - CloseDrawer Method

Causes AppDrawer to close

Member of Application Drawer (PRIM_MD.AppDrawer)

Details

Method will close the Application Drawer.

Example

This example shows the the Application being opened and closed by clicking on the menu icon and close icon.

Begin_Com Role(*EXTENDS #PRIM_WEB) Theme(#SYS_THEME) Layoutmanager(#Layout1)

    Define_Com Class(#PRIM_TBLO) Name(#Layout1)
    Define_Com Class(#PRIM_TBLO.Column) Name(#Column1) Displayposition(1) Parent(#Layout1) Width(240) Units(Content)
    Define_Com Class(#PRIM_TBLO.Column) Name(#Column2) Displayposition(2) Parent(#Layout1) Width(1.6)
    Define_Com Class(#PRIM_TBLO.Row) Name(#Row1) Displayposition(1) Parent(#Layout1) Height(0.14)
    Define_Com Class(#PRIM_TBLO.Row) Name(#Row2) Displayposition(2) Parent(#Layout1) Height(1.86)
    Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item1) Alignment(TopLeft) Column(#Column1) Manage(#Appdrawer) Parent(#Layout1) Row(#Row1) Rowspan(2) Sizing(FitToHeight)
    Define_Com Class(#PRIM_TBLO.Item) Name(#Layout1Item2) Alignment(TopLeft) Column(#Column2) Manage(#Appbar) Parent(#Layout1) Row(#Row1)
    Define_Com Class(#PRIM_TBLO) Name(#AppdrawerLayout)
    Define_Com Class(#PRIM_TBLO.Column) Name(#AppdrawerLayoutColumn1) Displayposition(1) Parent(#AppdrawerLayout)
    Define_Com Class(#PRIM_TBLO.Row) Name(#AppdrawerLayoutRow1) Displayposition(1) Parent(#AppdrawerLayout)
    Define_Com Class(#PRIM_TBLO.Item) Name(#AppdrawerLayoutItem1) Column(#AppdrawerLayoutColumn1) Manage(#Menu) Parent(#AppdrawerLayout) Row(#AppdrawerLayoutRow1)
    Define_Com Class(#PRIM_TBLO) Name(#Layout2)
    Define_Com Class(#PRIM_TBLO.Row) Name(#Layout2Row1) Displayposition(1) Parent(#Layout2)
    Define_Com Class(#PRIM_TBLO.Column) Name(#Layout2Column1) Displayposition(1) Parent(#Layout2)
    Define_Com Class(#PRIM_TBLO.Item) Name(#Layout2Item1) Alignment(TopRight) Column(#Layout2Column1) Manage(#Icon1) Parent(#Layout2) Row(#Layout2Row1) Sizing(None)

    Define_Com Class(#PRIM_MD.AppDrawer) Name(#Appdrawer) Displayposition(1) Layoutmanager(#AppdrawerLayout) Parent(#COM_OWNER) Tabposition(1) Themedrawstyle('MediumTitle') Height(800) Width(240) Drawerstyle(SlideInLeft)
    Define_Com Class(#PRIM_MD.Menu) Name(#Menu) Displayposition(1) Height(800) Parent(#Appdrawer) Tabposition(1) Width(240) Themedrawstyle('DarkTitle') Layoutmanager(#Layout2) Imagealignment(CenterRight)
    Define_Com Class(#PRIM_MD.MenuItem) Name(#MenuItem) Caption('View 1') Displayposition(2) Height(50) Icon('view_quilt') Left(0) Parent(#Menu) Tabposition(1) Top(0) Width(240)
    Define_Com Class(#PRIM_MD.MenuItem) Name(#MenuItem1) Caption('View 2') Displayposition(3) Height(50) Icon('view_quilt') Left(0) Parent(#Menu) Tabposition(2) Top(50) Width(240)
    Define_Com Class(#PRIM_MD.MenuItem) Name(#MenuItem2) Caption('View 3') Displayposition(4) Height(50) Icon('view_quilt') Left(0) Parent(#Menu) Tabposition(3) Top(100) Width(240)
    Define_Com Class(#PRIM_MD.AppBar) Name(#Appbar) Caption('Title') Displayposition(2) Icon('menu') Left(240) Parent(#COM_OWNER) Tabposition(2) Themedrawstyle('Heading2') Width(960)
    Define_Com Class(#PRIM_MD.Icon) Name(#Icon1) Displayposition(1) Icon('close') Left(192) Parent(#Menu) Tabposition(4) Top(0)

        Evtroutine Handling(#Appbar.IconClick)

            #Appdrawer.ShowDrawer

        Endroutine

        Evtroutine Handling(#Icon1.Click)

            #Appdrawer.CloseDrawer

        Endroutine

End_Com

See also

All Component Classes

Technical Reference

V14SP2 April 2018