Pascal版本的 - freopen-CSDN博客

本文链接：https://blog.csdn.net/sonadorje/article/details/128990197

freopen()函数用于改变已打开文件的相关流，如将标准输出重定向到指定文件。它可以接受文件名、访问模式参数，例如r（读取）、w（写入，会清空文件）、a（追加）等。在给定的例子中，程序首先输出到控制台，然后使用freopen()将stdout与file.txt关联，之后的所有输出都被写入文件。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

参数

filename -- 这是包含要打开的文件的名称的字符串。
mode -- 这是包含文件访问模式的字符串。它包括 -

高级编号	模式&说明
1个	“r” 打开文件进行读取。该文件必须存在。
2个	“w” 创建一个用于写入的空文件。如果已存在同名文件，则删除其内容并将该文件视为新的空文件。
3个	“A” 附加到文件。写操作在文件末尾追加数据。如果文件不存在，则创建该文件。
4个	“r+” 打开一个文件以更新读写。该文件必须存在。
5个	“w+” 创建一个用于读写的空文件。
6个	“一个+” 打开文件进行读取和追加。

stream -- 这是指向 FILE 对象的指针，该对象标识要重新打开的流。

返回值

如果文件重新打开成功，该函数返回一个指向标识流的对象的指针，否则返回空指针。

例子

以下示例显示了 freopen() 函数的用法。

function main:integer;
var
  fp : PFILE;
begin
   printf('This text is redirected to stdout'#10, []);
   fp := freopen('file.txt', 'w+', stdout);
   printf('This text is redirected to file.txt'#10, []);
   fclose(fp);
   Result := (0);
end;

让我们编译并运行上面的程序，它将在 STDOUT 发送以下行，因为最初我们没有打开 stdout -

<span style="color:#000000">This text is redirected to stdout
</span>

在调用freopen()之后，它将 STDOUT 与文件file.txt相关联，因此无论我们在 STDOUT 写入什么，都会进入file.txt。因此，文件file.txt将具有以下内容。

<span style="color:#000000">This text is redirected to file.txt</span>

pasca版本printf用法和C语言兼容，唯一差别是以[]来标准参数集合。

字符串已经写入指定文件