_MousePosP( ) API Library Routine


int _MousePosP(Point FAR pt) Point FAR pt; /* Pointer. */

_MousePosP( ) returns True (an integer other than 0) if the left mouse button is down when the function is called, or False (0) if the left mouse button isn't down.

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

The following example displays the current mouse pointer position until it detects a left mouse button click.

Visual FoxPro Code

	Copy Code
SET LIBRARY TO MOUSEPOP

C Code

	Copy Code
#include <pro_ext.h> void putLong(long n, int width) { Value val; val.ev_type = 'I'; val.ev_long = n; val.ev_width = width; _PutValue(&val); } FAR MousePosPEx(ParamBlk FAR parm) { Point mousePos; while (!_MousePosP(&mousePos)) { _PutStr("\nvertical ="); putLong(mousePos.v, 5); _PutStr("; horizontal ="); putLong(mousePos.h, 5); } } FoxInfo myFoxInfo[] = { {"ONLOAD", (FPFI) MousePosPEx, CALLONLOAD, ""}, }; FoxTable _FoxTable = { (FoxTable FAR ) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo };

Copy Code

#include <pro_ext.h>
void putLong(long n, int width)
{
   Value val;
   val.ev_type = 'I';
   val.ev_long = n;
   val.ev_width = width;
   _PutValue(&val);
}
FAR MousePosPEx(ParamBlk FAR *parm)
{
   Point mousePos;
   while (!_MousePosP(&mousePos))
   {
      _PutStr("\nvertical =");
      putLong(mousePos.v, 5);
      _PutStr("; horizontal =");
      putLong(mousePos.h, 5);
   }
}
FoxInfo myFoxInfo[] = {
   {"ONLOAD", (FPFI) MousePosPEx, CALLONLOAD, ""},
};
FoxTable _FoxTable = {
   (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
};

Remarks

Example

Visual FoxPro Code

C Code

See Also

Reference

Concepts

Other Resources