_WGetCursor( ) (Rutina de biblioteca API)

Devuelve la posición de resultado actual en la ventana especificada.

Point _WGetCursor(WHANDLE wh)
WHANDLE wh;            /* Window handle. */

Ejemplo

El ejemplo siguiente crea una ventana y dibuja un patrón diagonal de X en la misma. Sitúa el cursor antes de escribir cada una de las X mediante _WPosCursor( ) y adopta esa misma posición mediante _WGetCursor( ).

Código Visual FoxPro

SET LIBRARY TO WGETCURS

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 Example(ParamBlk FAR *parm)
{
   WHANDLE wh;
   Point putPos, getPos;

   wh = _WOpen(4,4,20,70,0,WINDOW_SCHEME,(Scheme FAR *) 0,
      WO_SYSTEMBORDER);
   _WShow(wh);

   for (putPos.v = 2; putPos.v < 14; putPos.v++)
   {
      putPos.h = putPos.v;

      _WPosCursor(wh, putPos);
      getPos = _WGetCursor(wh);
      _WPutChr(wh, 'X');

      _PutStr("\nCursor position:");
      putLong(getPos.v, 5);
      putLong(getPos.h, 5);

      _Execute("WAIT WINDOW");
   }
   _WClose(wh);
}

FoxInfo myFoxInfo[] = {
   {"ONLOAD", (FPFI) Example, CALLONLOAD, ""},
};
FoxTable _FoxTable = {
   (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
};

Vea también

_WPosCursor( ) | Acceso a la API de Visual FoxPro | _WGetCursorP( ) (Rutina de biblioteca API)