DEFINE MAIN MENU

Creates a Main Menu definition

Standard Syntax (xBase Style):

DEFINE MAIN MENU [ OF <ParentWindowName> ]
   DEFINE POPUP <cPopupCaption> [ NAME <PopupName> ]
      MENUITEM <cItemCaption>
         ACTION <ActionProvedureName> | <bBlock>
         [ NAME <MenuItemName>]
         [ IMAGE <cImageName> ]
         [ CHECKED ]
         [ NOTRANSPARENT ]
         [ TOOLTIP <cToolTipText> ]
         ...
         ...
         [ SEPARATOR ]
         ...
         ...
   END POPUP
   ...
   ...
END MENU

Alternate Syntax:

DEFINE MAINMENU [ PARENT <ParentWindowName> ]
   DEFINE POPUP <cPopupCaption> [ NAME <PopupName> ]
      MENUITEM <cItemCaption>
      ONCLICK <ActionProvedureName> | <bBlock>
      [ NAME <MenuItemName>]
      [ IMAGE <cImageName> ]
      [ CHECKED <lValue> ]
      [ TRANSPARENT <lValue> ]
      [ TOOLTIP <cToolTipText> ]
      ...
      ...
      [ SEPARATOR ]
      ...
      ...
   END POPUP
   ...
   ...
END MENU

MainMenu Properties:

• Parent (R)

  R: Read-Only

MenuItem Properties:

• Name (R)
• Checked
• Enabled
• Image
• ToolTip

R: Read-Only

MenuItem Events:

• OnClick (R)

R: Read-Only

You can DEFINE\/RELEASE Menu at runtime:

RELEASE MAIN MENU OF FormName
RELEASE MAINMENU OF FormName
ReleaseMainMenu ( cFormName )
IsMainMenuDefined ( cFormName ) --> lBoolean