本文整理自网络，侵删。
CloseFile
功能说明：关闭文件。当对文件的操作完成后，应该使用CloseFile函数关闭打开的文件。
参考实例：
var
S: String;
AllText: String;
F: TextFile;
begin
AssignFile(F, 'C:\MyFile.txt'); // 将C:\MyFile.txt文件与F变量建立连接，后面可以使用F变量对文件进行操作。
Reset(F); // 打开文件
while not EOF(F) do begin // 使用While循环，一直判断是否到了文件未尾
Readln(F, S); // 读取一行文本
AllText := AllText + S;
end;
CloseFile(F); // 关闭文件
end;
相关阅读 >>
Delphi xe5实现按android的back键无法退出关闭程序
更多相关阅读请进入《Delphi》频道 >>
