Delphi文件操作常用函数

====================================================
Delphi操作文件的一般步骤：
1）关联文件：
 AssignFile(var F; FileName :string)；
2）初始化文件：
 Append(var F :Text);   
 //只写，于文件最后追加数据
 Reset(var F [; RecSize :Word]);      
 //只读，文件必须存在，文件指针置于开头
 //第二参数指定指针移动的大小，对于无类型文件有效
 //对于类型文件，则按具体类型的大小，而文本文件默认128字节
 Rewrite(var F :File [; Recsize :Word]);
 //覆盖只写，若文件已存在，则删之重建空文件写
3）读写文件：
 Eof(var F):Boolean; //End of File? 文件指针是否处于文件结尾
 Eoln[(var F :Text)]:Boolean; //End of line?
 Seek(var F; N :Longint); //对于文本文件无效
 //移动文件指针N个单位，N为正则向前移，N为负则向后移
 SeekEof[(var F :Text)]:Boolean;
 //同Eof，区别在于本函数忽略空白符
 
 SeekEoln[(var F :Text)]:Boolean;
 //同Eoln，区别在于本函数忽略空白符
 FilePos(var F):Longint; //文件必须打开
 //获取文件指针当前位置，若在文件开头则返回0
 FileSize(var F):Integer; //文件必须打开
 //获取文件大小，返回的大小并非根据字节计算，而是根据传递数据时记录的大小计算。故应先声明一个无类型文件并初始化为Reset(F,1);使记录大小为1字节，或者声明char类型（1字节）文件，即：File of char变量
 Read(F, v1 [, v2, v3...vn]);
 //读取一个数据存储于参数v1中，若一次读取多个数据，则可带多个参数。若声明的是类型文件，则参数的类型和类型文件的类型一致；若声明的是文本文件，则参数基本上可以是任何基本数据类型。当读入多个数值时，Read方法将假定数值是用一个或多个空格、制表符（#9）或回车（#13#10）隔开的，而不是逗号、分号或其它字符。
 Readln([var F :Text;] v1 [, v2, ...,vn]);
 //读取一行数据，只适用于文本文件
 Write(F, v1 [, v2,...,vn]); //往文件中添加内容
 Writeln([var F :Text;] p1 [, p2,...,pn]);
 //写一行数据，只适用于文本文件
4）关闭文件：
 CloseFile(var F); 
 //解除文