_MousePos( ) (Rutina de biblioteca API)
Rellena pt con la posición actual del puntero del mouse (ratón).
int _MousePos(Point FAR *pt)
Point FAR *pt; /* Pointer. */
Observaciones
_MousePos( ) devuelve verdadero (un entero distinto de 0) si está presionado el botón primario del mouse cuando se llama a la función; de lo contrario, devuelve falso (0).
Para obtener más información acerca de cómo crear una biblioteca API e integrarla con Visual FoxPro, vea Acceso a la API de Visual FoxPro.
Ejemplo
El ejemplo siguiente muestra la posición actual del puntero del mouse hasta que detecta un clic del botón primario del mouse.
Código Visual FoxPro
SET LIBRARY TO MOUSEPOS
Código C
#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 MousePosEx(ParamBlk FAR *parm)
{
Point mousePos;
while (!_MousePos(&mousePos))
{
_PutStr("\nvertical =");
putLong(mousePos.v, 5);
_PutStr("; horizontal =");
putLong(mousePos.h, 5);
}
}
FoxInfo myFoxInfo[] = {
{"ONLOAD", (FPFI) MousePosEx, CALLONLOAD, ""},
};
FoxTable _FoxTable = {
(FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
};
Vea también
_FindWindow( ) (Rutina de biblioteca API) | _GlobalToLocal( ) (Rutina de biblioteca API) | _MousePosP( ) (Rutina de biblioteca API) | Acceso a la API de Visual FoxPro