Click above to get retro games delivered to your door ever month!

dfMenu()
Activates a menu defined by dfMenuAdd()
------------------------------------------------------------------------------
Syntax:

     dfMenu( <aMenu>,;
             <nTop>, <nLeft>, <nBottom>, <nRight>,;
             [<cAct>], [<cPos>], [<lSystem>] ) --> cOpt

Parameters:

     <aMenu>    Array, defined by dfMenuAdd()
     <nTop>, <nLeft>, <nBottom>, <nRight> Coordinates in which to design
     the menu.
     <cAct>     More actions to quit the menu. The menu can be leaved by
     default using "esc" or "ret". If an action is specified in
     'cAct' (e.g. "F05-win") the menu can be leaved using that
     key.
     <cPos>     Default label.
     <lSystem>  If .T., only the system menu is activated.  Default is .F.

Returns:

     <cOpt> Selected option. If the menu has been left using "esc", EMPTY
     will be returned.

Description:

     A menu which has been previously defined by dfMenuAdd() is activated.
     The menu can be activated by a mouse. The function returns the
     selected label.

Example:

     LOCAL aMenu := {}, bOpt
     dfMenuAdd( aMenu, "1", MN_LABEL ,;
                {||MN_ON}, {||.T.}, "Procedure"  ,;
                "ins", {||CliDeExe(DE_STATE_INK)},;
                "Data Entry" )
     dfMenuAdd( aMenu, "2", MN_LABEL ,;
                {||MN_ON}, {||.T.}, "Report"     ,;
                "add",{||CliPrnExe(DE_STATE_INK)},;
                "Report" )
     cOpt := dfMenu( aMenu, 0,0,24,79 )
     EVAL( dfMenuBlock( aMenu, cOpt ) )

See also:

     dfMenuAdd(), dfMenuBlock()