Intel® Fortran Libraries Reference

2 Intel Fortran Libraries ReferenceExampleUSE IFPORTINTEGER(4) numsec, istatEXTERNAL subprognumsec = 4write *, "subprog will begin in ", numsec, " seconds"ISTAT = ALARM (numsec, subprog)APPENDMENUQQQuickWin Function: Appends a menu item to the end of a menu and registers its callbacksubroutine. This function is only available on Windows* systems.Module: USE IFQWINSyntaxresult = APPENDMENUQQ (menuID, flags, text, routine)menuID(Input) INTEGER(4). Identifies the menu to which the item is appended, starting with 1 as theleftmost menu.flags(Input) INTEGER(4). Constant indicating the menu state. Flags can be combined with aninclusive OR (see Results below). The following constants are available:• $MENUGRAYED – Disables and grays out the menu item.• $MENUDISABLED – Disables but does not gray out the menu item.• $MENUENABLED – Enables the menu item.• $MENUSEPARATOR – Draws a separator bar.• $MENUCHECKED – Puts a check by the menu item.• $MENUUNCHECKED – Removes the check by the menu item.text(Input) Character*(*). Menu item name. Must be a null-terminated C string, for example,'WORDS OF TEXT'C.routine(Input) EXTERNAL. Callback subroutine that is called if the menu item is selected. All routinestake a single LOGICAL parameter that indicates whether the menu item is checked or not. Youcan assign the following predefined routines to menus:2-6