FileClose

通过 FileOpen()关闭先前打开的文件。

void  FileClose(

   int  file_handle      // 文件句柄

   );

参量

file_handle

[in] 通过 FileOpen()返回文件说明符。

返回值

无值返回。

示例：

//--- 启动脚本时显示输入参数的窗口

#property script_show_inputs

//--- 输入参数

input string InpFileName="file.txt";    // 文件名称

input string InpDirectoryName="Data";   // 目录名称

input int    InpEncodingType=FILE_ANSI; // ANSI=32 或 UNICODE=64

//+------------------------------------------------------------------+

//| 脚本程序启动函数                                                   |

//+------------------------------------------------------------------+

void OnStart()

  {

//--- 打印文件将要使用的路径

   PrintFormat("Working %s\\Files\\ folder",TerminalInfoString(TERMINAL_DATA_PATH));

//--- 重置错误值

   ResetLastError();

//--- 打开阅读文件(如果文件不存在，错误将产生)

   int file_handle=FileOpen(InpDirectoryName+"//"+InpFileName,FILE_READ|FILE_TXT|InpEncodingType);

   if(file_handle!=INVALID_HANDLE)

     {

      //--- 打印文件内容

      while(!FileIsEnding(file_handle))

         Print(FileReadString(file_handle));

      //--- 关闭文件

      FileClose(file_handle);

     }

   else

      PrintFormat("Error, code = %d",GetLastError());

  }