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

 menudispmessage()   Display the current prompt's message
------------------------------------------------------------------------------
 Declaration
   menu.hdr

 Syntax
   func logical menudispmessage extern
   param value _MENU pMenu

 Arguments
   pMenu is the pointer to a previously created menu system. If 0, the
         default menu will be used.

 Return
   A logical, indicating the success of the function (if .f., an invalid
   menu pointer was specified).

 Description
   This function displays the message associated to the current menu prompt
   at the message row defined by the set message to command (default is row
   24), and at the column defined with setmessagecol() (default is column 0).

 Example
   #define EXAMPLE_MENU
   #include example.hdr

   proc Test_menudispmessage
   vardef
      _MENU pMenu
   enddef
   
   clear
   
   set message to 10
   setmessagecol( 15 )
   
   // Define prompts for the standard menu
   //
   @ 5, 23 prompt "1st prompt" message "1st message" id 1
   @ 6, 23 prompt "2st prompt" message "2st message, a bit longer" id 2
   @ 7, 23 prompt "3st prompt" message "3st message" id 3
   @ 8, 23 prompt "4st prompt" message "4st message" id 4
   
   // Retrieve the pointer to the standard menu
   //
   pMenu := menuptr( .f. )
   
   repeat
   
      // Notice how the messages are displayed adjusted to the
      // length of the second message
      //
      menudispmessage( pMenu )
      waitms( 1000 )
   
   until .not. menusetnext( pMenu )
   
   clear menu
   endproc

   proc main
   Test_menudispmessage()
   endproc