SETWINDOWMENUQQ (W*32, W*64)

QuickWin Function: Sets a top-level menu as the menu to which a list of current child window names is appended.

Module: USE IFQWIN

Syntax

result = SETWINDOWMENUQQ (menuID)

menuID
(Input) INTEGER(4). Identifies the menu to hold the child window names, starting with 1 as the leftmost menu.

Results

The result type is LOGICAL(4). The result is .TRUE. if successful; otherwise, .FALSE..

The list of current child window names can appear in only one menu at a time. If the list of windows is currently in a menu, it is removed from that menu. By default, the list of child windows appears at the end of the Window menu.

Compatibility

QUICKWIN GRAPHICS LIB

See Also: APPENDMENUQQ, Building Applications: Using QuickWin Overview, Building Applications: Customizing QuickWin Applications, Building Applications: Program Control of Menus

Example

 USE IFQWIN
 TYPE (windowconfig) wc
 LOGICAL(4) result, status /.FALSE./
 ! Set title for child window
 wc%numxpixels  = -1
 wc%numypixels  = -1
 wc%numtextcols = -1
 wc%numtextrows = -1
 wc%numcolors   = -1
 wc%fontsize    = -1
 wc%title= "I am child window name"C
 if (.NOT.status) status = SETWINDOWCONFIG(wc)

 ! put child window list under menu 3 (View)
 result = SETWINDOWMENUQQ(3)
 END