_WClearRect( ) API Library Routine

Visual FoxPro 9.0 SP2

_WClearRect( ) API Library Routine


void _WClearRect(WHANDLE wh, Rect r) WHANDLE wh; /* Window handle. / Rect r; / Rectangle to clear. */

Remarks

The output position is unchanged.

The area of the rectangle extends from the top left coordinate to, but not including, the bottom right coordinate. This means that you should declare the bottom and right coordinates to be one more than the intended size of the rectangle.

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 creates a window and fills it with Xs. After the user presses a key in response to a Visual FoxPro WAIT command, _WClearRect( ) clears a rectangular region of the window.

Visual FoxPro Code

	Copy Code
SET LIBRARY TO WCLRECT

C Code

	Copy Code
#include <pro_ext.h> FAR WClearEx(ParamBlk FAR parm) { WHANDLE wh; int row, col; Rect r; wh = _WOpen(2,2,20,70,WEVENT \| CLOSE,WINDOW_SCHEME,(Scheme FAR ) 0, WO_SYSTEMBORDER); _WShow(wh); for (row = 0; row < _WHeight(wh); row++) { for (col = 0; col < _WWidth(wh); col++) { _WPutChr(wh, 'X'); } } _Execute("WAIT WINDOW 'Press any key to clear window rectangle'"); r.top = 2;W r.left = 2; r.bottom = 15; r.right = 65; _WClearRect(wh, r); } FoxInfo myFoxInfo[] = { {"ONLOAD", (FPFI) WClearEx, CALLONLOAD, ""}, }; FoxTable _FoxTable = { (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo };

Copy Code

#include <pro_ext.h>
FAR WClearEx(ParamBlk FAR *parm)
{
   WHANDLE wh;
   int row, col;
   Rect r;
   wh = _WOpen(2,2,20,70,WEVENT | CLOSE,WINDOW_SCHEME,(Scheme FAR *) 0,
      WO_SYSTEMBORDER);
   _WShow(wh);
   for (row = 0; row < _WHeight(wh); row++)
   {
      for (col = 0; col < _WWidth(wh); col++)
      {
         _WPutChr(wh, 'X');
      }
   }
   _Execute("WAIT WINDOW 'Press any key to clear window rectangle'");
   r.top    = 2;W
   r.left    = 2;
   r.bottom = 15;
   r.right  = 65;
   _WClearRect(wh, r);
}
FoxInfo myFoxInfo[] = {
   {"ONLOAD", (FPFI) WClearEx, CALLONLOAD, ""},
};
FoxTable _FoxTable = {
   (FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
};

_WClearRect( ) API Library Routine

Remarks

Example

Visual FoxPro Code

C Code

See Also

Reference

Other Resources