_FClose( ) API Library Routine Example
The following example creates a file Temp.txt, sets its size to 8196 bytes, and closes it using _FClose( ).
SET LIBRARY TO FCLOSE
DIR temp.txt
#include <pro_ext.h>
FAR Example(ParamBlk FAR *parm)
{
FCHAN fchan = _FCreate("temp.txt", FC_NORMAL);
_FCHSize(fchan, 8196);
_FClose(fchan);
}
FoxInfo myFoxInfo[] = {
{"FCHSIZE", (FPFI) Example, CALLONLOAD, ""},
};
FoxTable _FoxTable = {
(FoxTable FAR *) 0, sizeof(myFoxInfo)/sizeof(FoxInfo), myFoxInfo
};