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