点击或拖拽改变大小

Functions.FReadLine 方法

X#
从打开的文件中读取一行。

命名空间:  XSharp.RT
程序集:  XSharp.RT (在 XSharp.RT.dll 中) 版本:2.22 GA
语法
 FUNCTION FReadLine(
	ptrHandle,
	nMax
) AS STRING CLIPPER
查看代码

参数

ptrHandle (Optional)
类型:__Usual
要读取的文件句柄。
nMax (Optional)
类型:__Usual
每行要读取的最大字符数。FReadLine() 将读取直到遇到硬回车(Chr(13)),到达文件末尾,或读取了 nMax 个字符。
nMax 的默认值为 256。

返回值

类型:String
读取的行。当到达文件末尾时,FReadLine() 返回 NULL_STRING,并且 FError() 被设置为 257。
备注
此函数与 FGets() 相同。这两个函数都假定处理原始二进制数据,不依赖于 SetAnsi() 的状态。相比之下,FReadText() 和 FRead4() 依赖于 SetAnsi()。
示例
此示例使用 FReadLine() 读取整个文件,不指定 nMax 的值:
X#
1ptrHandle := FOpen2("docs.txt", FO_READ)
2IF ptrHandle != F_ERROR
3    DO WHILE !FEOF(ptrHandle)
4        ? FReadLine(ptrHandle)
5    ENDDO
6ENDIF
7FClose(ptrHandle)
以下示例提供了一个实用程序,用于显示并计算文件中字符串的所有出现次数:
X#
 1FUNCTION Grep(cSearch, cFile AS STRING) ;
 2        AS DWORD PASCAL
 3    LOCAL handle AS PTR
 4    LOCAL Count AS DWORD
 5    LOCAL Line AS STRING
 6    Line := " "
 7    handle := FOpen2(file, FO_READ)
 8    cSearch := Upper(cSearch)
 9    DO WHILE !FEOF(handle)
10        line := Upper(FReadLine(handle))
11        IF InStr(cSearch, line)
12            ? line
13        Count += 1
14        ENDIF
15    ENDDO
16    RETURN Count
参见