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 网址链接提取域名

datasnap 上传/下载大文件(本demo以图传片文件为例)

Delphi编程之关闭所有qq进程

Delphi datasettojson jsontodataset

Delphi 如何读取内存中的数据?

Delphi 读cpu串号的代码

Delphi 一个整数转其二进制表示的小函数

Delphi bmp 转换jpg

Delphi 中的颜色常量及效果图

Delphi侦测条码枪方式

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...