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
本地化和翻译函数
变量声明
常量表达式
常量声明
方法声明
复数
赋值
赋值操作
行标号
结构体声明
局部变量声明
逻辑运算
枚举声明
内置集合
内置数组
使用保留字作为标识符
事件声明
事件循环
属性声明
数据类型
数据类型的二进制表示形式
数组声明
算术运算
外部函数管理
外部函数声明
语言常量
运算符优先级
专用方法
字符串操作
主题
组件
最近的修改

WRITE

WRITE [ # Stream , ] Expression AS Datatype WRITE [ # Stream , ] String [ , Length ] WRITE [ # Stream , ] Pointer , Length

写入指定数据类型

第一种语法将一个Expression的二进制表述写入到Stream流。

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

当写入一个字符串时,字符串的长度被写在字符串内容之前。

更多信息参见数据类型的二进制表示形式

自从 3.15
如果设置了 Stream.NullTerminatedString 属性, 则不写入字符串的长度,而是在字符串结束后写入一个空字节。

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

如果Expression是一个集合、数组或结构体,其内容被递归写入。

当写入一个结构体时,结构体类型必须用Datatype参数指定。

如果写入不支持的数据类型或检测到循环引用,引发错误。

该语句写入的数据决定了流的字节序。

写入一个字符串的内容

第二种语法从String取Length个字节写入指定的流。

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

如果没有指定Length,使用String的长度。

写入内存的内容

第三种语法从Pointer指针指向的内存地址取Length个字节写入指定的流。

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

必须指定Length,否则没有任何操作发生。

写入任何对象
自从 3.15

任何对象都可以序列化,前提是它的类实现 _write 特殊方法。

可以使用以下语法之一写对象:

WRITE #Stream, Object As <ObjectClass>
WRITE #Stream, Object As Object
WRITE #Stream, Object As Variant

如果以后使用 'As Variant''As Object' 读取对象,则必须使用 'As Variant''As Object'

因为在这种情况下,所需的对象类名被写入流中,不然 READ 指令没有初始化对象所需的类名。

多次写入同一对象
自从 3.17

在3.17版本之前,多次写入的对象是复制的。

自3.17版本以来,它们不再是复制的。一旦一个对象被序列化,每次再次写入时,它都会被写为一个五字节的引用。

类似地,在读回时,对象被创建一次,并在所有其他引用之间共享。

自从 3.19

自 Gambas 3.19 开始,集合、数组和结构总是重复的。

仅可序列化对象共享实现 _write 的特殊方法。

与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语句创建一个内存流。

参见