本文整理自网络,侵删。
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 2009 之 tstringbuilder 类[3]: replace
Delphi2010读取mysql数据库text类型乱码的解决方案
Delphi shellexecute调用系统命令关闭计算机
更多相关阅读请进入《Delphi》频道 >>