Retro video games delivered to your door every month!
Click above to get retro games delivered to your door ever month!
X-Hacker.org- Artful Two for Clipper 5.0 - Norton Guide http://www.X-Hacker.org [<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]

Syntax

PD_CREATE( cPrompt, aMenu )

Purpose

Creates a "menu object" for use by PD_MENU().

Arguments

     cPrompt -- a string used as the menu prompt, for example E~xit.
                    The tilde (~) causes the next character to be the
                    option's activator.

     aMenu -- an array of menu items, each of which contains a prompt
                  string and a code block to execute on selection of that
                  option.

Example

     LOCAL aFileMenu := ;
       PD_CREATE( "~File", ;
                  { { "~New   ", bTestBlock }, ;
                    { "~Delete ", bTestBlock }, ;
                    { "E~xit  ", {||QUITPROG()} } ;
                  } ;

                )

Returns

An array which acts as a "submenu object". In itself the submenu object
is useless: it must be added to a menu.

Side Effects

The menu object must be correctly structured or the function will
crash.

Artful Calls

None.

Source File

AA_PDMNU.PRG

Online resources provided by: http://www.X-Hacker.org --- NG 2 HTML conversion by Dave Pearson