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

返回介绍

Flush过程

发布于 2019-08-04 字数 722 浏览 951 评论 0

System

procedure Flush(var F:Text);

Flush清空一个为输出文本文件的缓冲区。

F是一个文本文件变量。当一个文本文件为输出,并由Rewrite或Append操作打开时,Flush清空了文件的缓冲区。这样可以保证所有被写入文件的字符同时,也已经被写入了外部的文件中。Flush对输入操作的打开文件没有影响。使用{$I+}编辑开关可以通过异常处理运行时间错误。当使用{$I-}开关时,使用IOResult可以检查I/O错误。

var

f : TextFile;

begin

if OpenDialog1.Execue then

begin{打开一个文本文件}

AssignFile(f,OpenDialog1.FileName);

Append(f);

Writeln(f, ‘I am appendingsome stuff to the end of the file.’);

Flush(f); {确保文本被实际写入文件内}

CloseFile(f);

end;

end;

上一篇:Floor函数

下一篇:FMTBCDToCurr函数

发布评论

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

支持 Markdown 语法,需要帮助?

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