TEXT TO <VariableName> [ADDITIVE]
TextLines
ENDTEXT
TextLines | 指定要赋值给变量 VarName 的文本 |
TO <VariableName> | 指定用于传递 TEXT...ENDTEXT 内容的变量名。该变量应为字符串类型,或允许添加字符串。它不一定是一个局部变量,也可以是当前类中的一个字段或一个表达式(someVar:SomeField) |
ADDITIVE | 决定 TO 变量的内容是被覆盖还是添加到现有内容中。 |
FUNCTION Start() AS VOID
LOCAL cValue AS STRING
TEXT TO cValue
Line 1
Line 2
Line 3
ENDTEXT
? cValue
TEXT TO cValue ADDITIVE
Line 4
Line 5
ENDTEXT
? cValue
RETURN
第一次,变量将包含 3 行以 CR/LF 分隔的文本。第二次将包含 5 行。
编译器生成的代码大致如下:
FUNCTION Start() AS VOID
LOCAL cValue AS STRING
cValue := ""
cValue += "Line 1" + chr(13)+chr(10)
cValue += "Line 2" + chr(13)+chr(10)
cValue += "Line 3" + chr(13)+chr(10)
? cValue
cValue += "Line 4" + chr(13)+chr(10)
cValue += "Line 5" + chr(13)+chr(10)
? cValue
RETURN