文件读写 学习笔记

1常用函数

　　procedure AssignFile(var F;FileName:string);

　　将一个外部文件的文件名和一个file类型的变量关联。如果参数filename指向的字串为空，则将参数f与标准输入文件或标准输出文件关联。如果assignfile过程将参数f与一个空文件名关联后，调用reset（f），则f与标准输入文件关联；如果调用的是rewrite（f），则f与标准输出文件关联。

　　procedure append（var f：text）;

　　为在一个已经存在的文件的最后添加文本做准备工作。调用时要保证以只写方式打开。

　　procedure CloseFile(var F);

　　关闭文件，同时将文件记录盘上的文件与相关文件变量断开联系。一般放在finall语句块中执行。

　　procedure DeleteFile(const Filename:string):boolean;

 将一个文件从记录盘上删除，如果文件不存在或无法删除，则返回false

　　procedure Eof[(var F:text)]:boolean;//用于文本文件

　　procedure Eof(var F):boolean;//用于类型文件和无类型文件

　　判断是否到了文件的结尾。如果文件为空或当前位置在最后一个字符之后，则返回true

 

　　procedure Eoln[(var F:text)]:boolean;

　　测试文件指针是否指向一行的最后，适用于文本文件。如果当前的位置在一行的末尾或eof(f)函数返回的是true，则eoln函数返回的是true

　　

　　procedure Erase(var F);

用于删除一个已经存在的文件。如果文件被打开，则先关闭文件在执行删除操作。

　　procedure FileExists(const filename:string):boolean;

测试指定文件名的文件是否存在。如果文件存在，返回true

　　procedure FileGetAttr(const filename:string):integer;

获取文件的属性设置。

　　文件属性及其对应的数值表：

FaReadOnly $00000001 只读文件

FaHidden     $00000002 隐藏文件

FaSysFile     $00000004 系统文件

FaVolumeID $00000008 卷标志文件

FaDirectory  $00000010 目录文件

FaArchive     $00000020 存档文件

FaAnyFile     $0000003F 所有类型文件

 

procedure write([var f:text;]p1[,p2,...,pn]);//文本文件

procedure write(F,v1,...,vn);//有类型文件

向一个文件中添加内容。

procedure Writeln([var F:text;]p1[,p2,...,pn]);

向文本文件中添加一行内容，即在写入内容后有回车换行符。