_MenuInteract( ) API Library Routine

Visual FoxPro 9.0 SP2

_MenuInteract( ) API Library Routine


int _MenuInteract(MENUID FAR menuid, ITEMID FAR itemid) MENUID FAR menuid; / Pointer to menu identifier. / ITEMID FAR itemid; /* Pointer to menu item identifier. */

Remarks

If the user chooses any menu item, _MenuInteract( ) returns 1. If no item is chosen (for example, if the user presses ESC) _MenuInteract( ) returns 0.

For more information on how to create an API library and integrate it with Visual FoxPro, see Accessing the Visual FoxPro API.

Example

The following example builds a menu with three items, and then requires the user to interact with the menu by calling _MenuInteract( ).

Visual FoxPro Code

	Copy Code
SET LIBRARY TO MENUINTE

C Code

	Copy Code
#include <pro_ext.h> void putLong(long n) { Value val; val.ev_type = 'I'; val.ev_long = n; val.ev_width = 10; _PutValue(&val); } FAR GetNewItemId(ParamBlk FAR parm) { MENUID menuId; ITEMID itemId; Point loc; menuId = _GetNewMenuId(); _NewMenu(MPOPUP, menuId); itemId = _GetNewItemId(menuId); _NewItem(menuId, itemId, -2, "\\<1st item"); itemId = _GetNewItemId(menuId); _NewItem(menuId, itemId, -2, "\\<2nd item"); itemId = _GetNewItemId(menuId); _NewItem(menuId, itemId, -2, "\\<3rd item"); loc.v = 10; loc.h = 20; _SetMenuPoint(menuId, loc); _MenuInteract(&menuId, &itemId); _PutStr("\nmenuId ="); putLong(menuId); _PutStr("\nitemId ="); putLong(itemId); _DisposeMenu(menuId); } FoxInfo myFoxInfo[] = { {"ONLOAD", (FPFI) GetNewItemId, CALLONLOAD, ""}, }; FoxTable _FoxTable = { (FoxTable FAR ) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo };

Copy Code

#include <pro_ext.h>
void putLong(long n)
{
   Value val;
   val.ev_type = 'I';
   val.ev_long = n;
   val.ev_width = 10;
   _PutValue(&val);
}
FAR GetNewItemId(ParamBlk FAR *parm)
{
   MENUID menuId;
   ITEMID itemId;
   Point loc;
   menuId = _GetNewMenuId();
   _NewMenu(MPOPUP, menuId);
   itemId = _GetNewItemId(menuId);
   _NewItem(menuId, itemId, -2, "\\<1st item");
   itemId = _GetNewItemId(menuId);
   _NewItem(menuId, itemId, -2, "\\<2nd item");
   itemId = _GetNewItemId(menuId);
   _NewItem(menuId, itemId, -2, "\\<3rd item");
   loc.v = 10; loc.h = 20;
   _SetMenuPoint(menuId, loc);
   _MenuInteract(&menuId, &itemId);
   _PutStr("\nmenuId ="); putLong(menuId);
   _PutStr("\nitemId ="); putLong(itemId);
   _DisposeMenu(menuId);
}
FoxInfo myFoxInfo[] = {
   {"ONLOAD", (FPFI) GetNewItemId, CALLONLOAD, ""},
};
FoxTable _FoxTable = {
   (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
};

_MenuInteract( ) API Library Routine

Remarks

Example

Visual FoxPro Code

C Code

See Also

Reference

Concepts

Other Resources