インテル® Fortran コンパイラー 19.0 デベロッパー・ガイドおよびリファレンス

SETWINDOWMENUQQ (W*S)

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

Module

USE IFQWIN

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.

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

See Also