_WClearRect( ) (Rutina de biblioteca API)
Borra el área rectangular especificada de la ventana especificada al cambiar el color de fondo predeterminado del área.
void _WClearRect(WHANDLE wh, Rect r)
WHANDLE wh; /* Window handle. */
Rect r; /* Rectangle to clear. */
Observaciones
La posición de resultado no cambia.
El área del rectángulo va de la coordenada superior izquierda a la coordenada inferior derecha, sin incluirla. Esto significa que deberá declarar las coordenadas inferior y derecha como una unidad más que el tamaño deseado del rectángulo.
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 crea una ventana y la llena con caracteres X. Cuando el usuario presiona una tecla en respuesta a un comando WAIT de Visual FoxPro, _WClearRect( ) borra una región rectangular de la ventana.
Código Visual FoxPro
SET LIBRARY TO WCLRECT
Código C
#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
};
Vea también
_WClear( ) (Rutina de biblioteca API) | WAIT (Comando) | _WClearRectP( ) (Rutina de biblioteca API) | Acceso a la API de Visual FoxPro