_GetNextEvent( ) API Library Routine Example

The following example is a loop consisting of a call to _GetNextEvent( ), followed by a call to _DefaultProcess( ). All events during this procedure receive their default processing.

Visual FoxPro Code

SET LIBR TO GETNXEV

C Code

#include <pro_ext.h>

FAR Example(ParamBlk FAR *parm)
{
   EventRec ev;
   int i;

   for (i = 0; i < 16; i++) {
      _GetNextEvent(&ev);
      _DefaultProcess(&ev);
   }
}
FoxInfo myFoxInfo[] = {
   {"ONLOAD", Example, CALLONLOAD, ""},
};
FoxTable _FoxTable = {
   (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
};