Gambas文档
编译和安装
错误消息
代码片段
待办事项
废弃的组件
教程
开发环境文档
开发者文档
名词解释
如何操作
说明
维基手册
维基搜索
维基许可协议
文档
应用程序仓库
语言概览
语言索引
#Else
#Endif
#If
+INF
-INF
Abs
Access
ACos
ACosh
Alloc
AND
AND IF
Ang
APPEND
AS
Asc
ASin
ASinh
Asl
Asr
ASSERT
ATan
ATan2
ATanh
Base$
Base64$
BChg
BClr
BEGINS
Bin$
Boolean@
BREAK
BSet
BTst
BYREF
Byte@
CASE
CATCH
CBool
Cbr
CByte
CDate
Ceil
CFloat
CHGRP
CHMOD
Choose
CHOWN
Chr$
CInt
CLASS
CLong
CLOSE
Comp
CONST
CONTINUE
Conv$
COPY
Cos
Cosh
CPointer
CREATE
CREATE PRIVATE
CREATE STATIC
CShort
CSingle
CStr
CString
CVariant
Date
Date@
DateAdd
DateDiff
Day
DConv$
DEBUG
DEC
Dec
DEFAULT
Deg
DFree
DIM
Dir
DIV
DO
DOWNTO
EACH
ELSE
END
ENDIF
ENDS
END SELECT
END STRUCT
END WITH
ENUM
Eof
ERROR
ERROR TO
Eval
Even
EVENT
EXEC
Exist
Exp
Exp2
Exp10
Expm
EXPORT
EXTERN
FALSE
FAST
FAST UNSAFE
FINALLY
Fix
Float@
Floor
FLUSH
FOR
FOR EACH
Format$
Frac
Free
FromBase
FromBase64$
FromUrl$
FUNCTION
GOSUB
GOTO
Hex$
Hour
Html$
Hyp
IF
IIf
IN
INC
INCLUDE or #INCLUDE
INHERITS
INPUT
INPUT FROM
InStr
Int
Int@
Integer@
IS
IsAlnum
IsAscii
IsBlank
IsBoolean
IsDate
IsDigit
IsDir
IsFloat
IsHexa
IsInf
IsInteger
IsLCase
IsLetter
IsLong
IsLower
IsMissing
IsNaN
IsNull
IsNumber
IsPunct
IsSpace
IsUCase
IsUpper
KILL
LAST
LCase$
Left$
Len
LET
LIBRARY
LIKE
LINE INPUT
LINK
LOCK
Lof
Log
Log2
Log10
Logp
Long@
LOOP
Lsl
Lsr
LTrim$
Mag
MATCH
Max
ME
Mid$
Min
Minute
MkBool$
MkBoolean$
MkByte$
MkDate$
MKDIR
MkFloat$
MkInt$
MkInteger$
MkLong$
MkPointer$
MkShort$
MkSingle$
MOD
Month
MOVE
NEW
NEXT
NOT
Now
NULL
Oct$
Odd
ON GOSUB
ON GOTO
OPEN
OPEN MEMORY
OPEN MEMORY
OPEN NULL
OPEN PIPE
OPEN PIPE
OPEN STRING
OPTIONAL
OR
OR IF
OUTPUT
OUTPUT TO
PEEK
Pi
Pointer@
PRINT
PRIVATE
PROCEDURE
PROPERTY
PUBLIC
QUIT
Quote$
Rad
RAISE
Rand
RANDOMIZE
RDir
READ
Realloc
REPEAT
Replace$
RETURN
Right$
RInStr
RMDIR
Rnd
Rol
Ror
Round
RTrim$
Scan
SConv$
Second
SEEK
Seek
SELECT
Sgn
SHELL
Shell$
Shl
Short@
Shr
Sin
Single@
Sinh
SizeOf
SLEEP
Space$
Split
Sqr
Stat
STATIC
STEP
STOP
STOP EVENT
Str$
Str@
String$
String@
StrPtr
STRUCT
SUB
Subst$
SUPER
SWAP
Tan
Tanh
Temp$
THEN
Time
Timer
TO
Tr$
Trim$
TRUE
TRY
TypeOf
UCase$
UnBase64$
UNLOCK
Unquote$
UNTIL
Url$
USE
Val
VarPtr
WAIT
WATCH
Week
WeekDay
WEND
WHILE
WITH
WRITE
XOR
Year
本地化和翻译函数
变量声明
常量表达式
常量声明
方法声明
复数
赋值
赋值操作
行标号
结构体声明
局部变量声明
逻辑运算
枚举声明
内置集合
内置数组
使用保留字作为标识符
事件声明
事件循环
属性声明
数据类型
数据类型的二进制表示形式
数组声明
算术运算
外部函数管理
外部函数声明
语言常量
运算符优先级
专用方法
字符串操作
主题
组件
最近的修改

READ

Variable = READ [ # Stream ] AS Datatype Variable = READ [ # Stream , ] Length

读取指定数据类型

第一种语法读取 Steam 流作为由 Datatype 参数指定类型的二进制数据。二进制表述形式由WRITE语句的用法决定。

如果没有指定 Stream ,使用标准输入。

返回的数据类型可以是下列之一: NULLBooleanByteShortIntegerLongPointerSingleFloatDateStringVariant、任意ArrayCollection或结构体。

读取一个字符串时,在流数据中字符串的长度必须先于字符串内容。 就像在数据类型的二进制表示形式中指定的那样。

自从 3.15

如果设置了 Stream.NullTerminatedString 属性, 则不读取字符串的长度,字符串读取直到遇到空字节为止。

如果流的内容不能被解释,引发一个错误。

该语句使用流的字节序(保存数据组织是高位在前或低位在前)作来读取数据。

Reading any object

自从 3.15

任何对象都可以反序列化,前提是它的类实现 _read 特殊方法。 如果对象以前以正确的方式序列化到流中,则可以通过在没有参数的情况下调用其构造函数来重建它,然后调用 _read 方法。

使用以下语法之一读取对象:
Object = READ # Stream As ObjectClass Object = READ # Stream As Object Object = READ # Stream As Variant

If you read the object by using 'As Variant' or 'As Object', you have to have written it by using 'As Variant' or 'As Object'.

Because in that case the needed object class name is written to the stream. Otherwise the READ instruction does not have the class name needed to instanciate the object.

读取一个字符串的内容

第二种语法从Stream流中读取由Length参数指定数量的字节,并将其作为一个字符串返回。

如果Length为负数,在流尾部读取由Length的绝对值指定的字节数。

如果没有指定Stream,使用标准输入。

与Gambas 2的兼容性

WRITE #Stream, Expression 在Gambas 2中写入Expression的二进制形式。 在Gambas 3中将Expression作为一个字符串写入。

所以在将Gambas项目从2版转换到3版时,必须检查所有的WRITE语句,并在需要时指定Datatype参数。

作为缺省,编译器支持旧的READ语法和遵照兼容规则的旧的WRITE语法。

如果想检测应该重写的READ/WRITE语句的位置, 可以用"--no-old-read-write-syntax"标志手工编译项目。 如果使用第二种语法,WRITE语句的Length参数成为强制参数。

不再能够使用一个Pointer作为流。取而代之应该用OPEN MEMORY语句创建一个内存流。

参见