BBjTopLevelWindow::addMenuBar

Description

Adds a menu bar to the BBjWindow.

Syntax

Return Value

Method

BBjMenuBar

addMenuBar()

Parameters

None.

Return Value

Returns the BBjMenuBar object of the window.

Remarks

Replaces an existing menu bar.

Example

REM Add a menu bar/menu/menu items to a Window

REM Obtain the instance of the BBjAPI object
LET myAPI!=BBjAPI()

REM Open the SysGui device
SYSGUI=UNT
OPEN (SYSGUI) "X0"

REM Obtain the instance of the BBjSysGui object
LET mySysGui!=myAPI!.getSysGui()

REM Set addWindow param values
X=10
Y=10
WIDTH=200
HEIGHT=200
TITLE$="BBj Window"

REM Set the current context
mySysGui!.setContext(0)
REM Create a window with a title in the current context
myWindow! = mySysGui!.addWindow(X,Y,WIDTH,HEIGHT,TITLE$)

REM Create the menu bar
myMenuBar!=myWindow!.addMenuBar()

REM Add a menu to the menu bar
myMenu!=myMenuBar!.addMenu(-1,"&First")

REM Add menu items to the menu
myMenu!.addMenuItem(-2,"&Sub Item 01",1,0)
myMenu!.addMenuItem(-3,"S&ub Item 02",1,0)
REM Add a sub menu to the menu
mySubMenu!=myMenu!.addMenu(-4,"Su&b Item 03")
REM Add menu items to the sub menu
mySubMenu!.addMenuItem(-5,"Sub Sub Item 04",1,0)
mySubMenu!.addMenuItem(-6,"Sub Sub Item 05",1,0)
REM Add a seperator the sub menu
mySubMenu!.addSeparator()
mySubMenu!.addMenuItem(-7,"Sub Sub Item 06",1,0)
mySubMenu!.addMenuItem(-8,"Sub Sub Item 07",1,0)

REM Register the CALLBACK routines
CALLBACK(ON_CLOSE,APP_CLOSE,mySysGui!.getContext())

REM Process Events
PROCESS_EVENTS

REM Callback routine called when the user closes the application window
APP_CLOSE:
RELEASE
RETURN

See Also

BBjAPI

BBjSysGui

BBjControl

BBjWindow

SETMENU Mnemonic - Set or Replace Menu

See the BBj Object Diagram for an illustration of the relationship between BBj Objects.



______________________________________________________________________________________

Copyright BASIS International Ltd. BBj®, Visual PRO/5®, PRO/5®, and BBx® are registered trademarks.