例如,有以下语句: var Letterfile: TextFile;//定义文件型变量 Assign File( Letter File, Myletter. txt);/把文件型变量与 文件名联系在一起 (2)打开文本文件 把磁盘文件与文件型变量关联在一起后,就可以 八打开文件了,打开文件可使用Rt、 Rewrite或 Append过程中的一个来进行。 ① Rewrite过程 [格式]: procedure Rewrite(varF:File[; Recsize: Word])
例如，有以下语句： var LetterFile:TextFile;//定义文件型变量 …… AssignFile(LetterFile,‘Myletter.txt’);//把文件型变量与 文件名联系在一起 （2）打开文本文件 把磁盘文件与文件型变量关联在一起后，就可以 打开文件了，打开文件可使用Reset、Rewrite或 Append过程中的一个来进行。 ①Rewrite过程 [格式]：procedure Rewrite(var F: File [; Recsize: Word ] );
② Append过程 格式]: procedure Append(varF:Text) ③ Reset过程 [格式]: procedure Reset(varF[:File; Resize Word]) 2.文本文件的关闭 文本文件使用过后要关闭,关闭文件使用 Closefile 过程,该过程的格式如下: [格式]: procedure Closefile(varF
②Append过程 [格式]：procedure Append(var F: Text); ③Reset过程 [格式]：procedure Reset(var F [: File; RecSize: Word ] ); 2．文本文件的关闭 文本文件使用过后要关闭，关闭文件使用CloseFile 过程，该过程的格式如下： [格式]：procedure CloseFile(var F);
例如,有下列语句: AssignFile( Letterfile," Myletter.txt');/把文件型 变量与文件名联系在一起 Rewrite( Letterfile);//创建指定的文件 Closefile( Letterfile);//关闭与文件型变量 Letterfile联系在一起的文件 3.文本文件的读写 (1)文本文件的写操作 Write过程的格式如下 [格式]: procedure Write([varF:Text;]P1[ P2,,,Pn]); 使用 Write和 Writeln向文本文件中写入数据时,还可 以指域宽和小数位
例如，有下列语句： AssignFile(LetterFile,'Myletter.txt');//把文件型 变量与文件名联系在一起 Rewrite(LetterFile);//创建指定的文件 …… CloseFile(LetterFile);// 关 闭 与 文 件 型 变 量 LetterFile联系在一起的文件 3．文本文件的读写 （1）文本文件的写操作 Write过程的格式如下。 [格式]：procedure Write( [var F: Text; ] P1 [ , P2,..., Pn] ); 使用Write和Writeln向文本文件中写入数据时，还可 以指域宽和小数位