Rewrite过程 - Borland Delphi 开发工作者手册

返回介绍

Rewrite过程

发布于 2019-08-04 字数 986 浏览 866 评论 0

System

procedureRewrite(Var F:File[;Recsize:Word]);

Rewrite创造一个新文件并打开它。

F是一个任意文件类型变量,它关联了一个外部文件(使用AssignFile)。RecSize是一个可选的表达式,只有F是一个非类型的文件时它才被说明。如果F是一个非类型文件,RecSize说明了数据传输时所记录的尺寸。如果RecSize被省略,一个缺省的128字节的记录尺寸被设想。Rewrite创造了一个新的外部文件,并且文件被赋予名F。如果一个名为F的外部文件已经存在,则这个文件被删除并且一个新的空文件在原地被创造。如果F已经被打开,它先被一个文本文件,则F变成只写型。在调用Rewrite之后,Eof(F)总是真的。使用{$I+}开关,可利用异常处理运行时间错误。使用{$I-}开关与IOResult来检查I/O错误。关闭然后被重新创造,当前的文件位置被设置为空文件的开始。如果F被分配了一个空名,像AssignFile(F,”),则在Rewrite调用之后,F参考标准的双重文件。如果F是

var

F:TextFile

begin

AssignFile(F,’NEWFILE,$$$’);

Rewrite(F);

Writeln(F,’Just created file with this text in it…’);

CloseFile(f);

end;

上一篇:Rese过程

下一篇:Rmdir过程

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!