FILESETEOF

• 来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgFileseteof
• 最后更新: 2021-10-11

---

设置绑定到文件号的已打开文件的长度

语法

declare function FileSetEof ( byval filenum as long ) as long

用法

#include "file.bi"
result = FileSetEof(fnum)

参数

filenum

绑定文件或设备的文件号。

返回值

成功时返回零（0），若无法设置文件末尾（文件大小）则返回错误码。

说明

FileSetEof 根据当前文件位置设置文件末尾。文件位置与 Seek 中一样以 1 为基准。

当当前文件位置在文件末尾之前时，文件将被截断：当前文件位置之前的内容被保留，当前位置及之后的内容被删除。当当前位置超过文件末尾时，文件将被扩展，填充零值字节。FileSetEof 完成后，当前文件位置位于文件末尾。

对于以 binary、output 或 append 模式打开的文件，要将文件长度设为 N 字节，需先 seek 到位置 N+1。对于以 random 模式打开的文件，要将文件长度设为 N 条记录，需先 seek 到位置 N+1。

示例

#include "file.bi"

'' create a zero length file
Open "file.dat" For Binary As #1
FileSetEof 1
Close #1

'' open same file and extend to 10000 bytes size
Open "file.dat" For Binary As #1
Seek #1, (10000 + 1)
FileSetEof 1
Close #1

'' open same file and truncate to 5000 bytes size
Open "file.dat" For Binary As #1
Seek #1, (5000 + 1)
FileSetEof 1
Close #1

'' clean-up
Kill "file.dat"

版本

• 自 fbc 1.08.0 起

与 QB 的差异

• FreeBASIC 新增。

另请参阅

• Eof
• Lof
• seek

返回 目录