FREAD() 函 数

从低级文件函数打开的文件返回指定数目的字节

语 法

FREAD ( nFileHandle , nBytes )

返 值 类 型

字符型

参 数 描 述

nFileHandle

FREAD() 要 返 回 数 据 的 文 件 的 句 柄 号

nBytes

FREAD() 函 数 返 回 的 字 节 数 FREAD() 从 文 件 指 针 的 当 前 位 置 开 始 返 回

nBytes 个 字 节 的 数 据 或 是 遇 到 文 件 尾 为 止

示 例

以下 示例 使用了 FREAD() 函数显示文件中的内容 如果文件为空 显示一条消息

• TEST.TXT must exist -- you can create this file

• 使用笔记本

Local gnFileHandle,nSize,cString gnFileHandle = FOPEN("test.txt")

• 搜寻文件结尾

  以确定文件的字节数

nSize = FSEEK(gnFileHandle, 0, 2) && 移动指针到文件头

IF nSize <= 0

• If the file is empty, display an error message WAIT WINDOW "This

  file is empty!" NOWAIT

ELSE

• 如果文件不为空

  程序在内存中储存其内容

• 然后在 Visual FoxPro 主窗口中显示文本

= FSEEK(ggnFileHandle, 0, 0) && 移动指针到文件尾

cString = FREAD (gnFileHandle, nSize)

? cString ENDIF

= FCLOSE(gnFileHandle) && 关闭文件

请 参 阅

FCHSIZE(), FCLOSE(), FCREATE(), FEOF(), FFLUSH(), FGETS(),

FILETOSTR(), FOPEN(), FPUTS(), FSEEK(), FWRITE()