Delphi EOF 判断文件指针是否移动到了文件未尾

本文整理自网络，侵删。

 EOF


　　功能说明：判断文件指针是否移动到了文件未尾。当EOF函数返回值为True时，则不可以使用Readln函数进行读取文件了。

　　参考实例：

　　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;

　　end;
 

相关阅读 >>

Delphi 压缩带密码的access数据库的方法

Delphi自有的md5函��

Delphi datasnap http用法注意事项

Delphi版的隐藏模块单元 hidemoduleunit.pas

Delphi idhttp1post上传图片

Delphi getprocessmemoryinfo获取进程占用内存大小

sendmessage这个函数有很多奇妙的用法

Delphi获取flash文件的影片时长,原始尺寸,帧数等信息

Delphi中设置系统时间方法

Delphi assignfile 与指定的文件建立连接

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi EOF 判断文件指针是否移动到了文件未尾