' 'Class description: ' !short:MD class structure: Class MD: ~~~~~~~~~~ Used as the help data structure for the class Menu. (clipper doesn't know the structured records yet) Common use: ~~~~~~~~~~~ There is no sense to use the object of this class indenpendently. Source code is in C_Menu.prg !seealso: c_menu.ngo:Menu c_view.ngo:View c_dbf.ngo:Dbf c_color.ngo:Color ob_class.ngo:"Class Hierarchy" !short:~~~~~~~~~~~~~~~~~~~~ !short:create class MD !short: export: !short: var Name //"" ^BMD:Name^N: public: character Menu item name. !short: var ID //0 ^BMD:ID^N: public: numeric Array Menu:Block and Menu:Avail pointer, (the menu item identifier) !short: var Help //0 ^BMD:Help^N: read-only: numeric Contain the RecNo of help item (in the help database (system3.dbf)) for this MD (menu data structure) object. !short: var Data //nil ^BMD:Data^N: public: array The array of MD objects for items submenu. !short: var Idx //1 ^BMD:Idx^N: public: numeric The current item of MD:Data, after the return to this menu level is the cursor position restored. !short: var CheckIt //false ^BMD:CheckIt^N: public: logical If true, the item is checked, it serves as switch. !short: var PreBlock //{||true} ^BMD:PreBlock^N: public: code_block The code block precessed before entering of the current item. As parameters receives the instvar variable ID of this data structure (the copy of the object of the MD class) and the second parameter is the menu item width. Can be used for next window position counting (see the Box:GoodInit()). !short: var PostBlock //{||true} ^BMD:PostBlock^N: public: code_block The code block processed when leaving the item, it becomes the same parameters as MD:PreBlock. !short: method New=MDNew //o:New() --> self ^BMD:New()^N: public: return self Object is filled with the default values. !short: endclass