tsl-devkit/docs/tsl/syntax/05_variables_and_constants.md

Variables And Constants

文档类型：语法主线 是否可直接用于生成代码：是 是否含已验证可执行示例：是 是否含已验证反例：是 遇到不确定时跳转到：04_values_and_literals.md、06_functions_and_calls.md、12_pitfalls.md

手册位置：第 5 篇，共 32 篇。上一篇：04_values_and_literals.md。下一篇：06_functions_and_calls.md。

这一篇收拢变量、常量与两种常量写法。

这一篇解决什么问题

回答“普通变量怎样直接使用、var 在什么位置出现、常量有哪些基本写法、哪些名字一旦绑定就不能再赋值”。

必须记住的规则

• 默认变量模型是“直接赋值即得到变量”，不要求先写 var。
• 例如：a := 1; b := array(1, 2, 3); 这种写法已验证可直接编译。
• var name; 目前只能当成一种显式声明写法，不能当成默认必需步骤。
• const Name = value; 和 const name := value; 不能当成完全等价的两种写法。
• 已验证：
  • const Name = value; 适合函数内部 const 段、unit 接口常量、类成员常量。
  • const name := value; 适合顶层直接写的常量，单独成段也能编译。
• 当前已验证：函数内部 const = expr、以及松散脚本顶层的 const = expr / const := expr，都可以把右侧写成常量表达式。
• 这两种常量在当前解释器里都不能再次赋值。
• 当前解释器接受多参数赋值：[a, b] := array(...)。
• 左侧只有一个变量时，末尾逗号不能省略，必须写成 [a, ] := array(...)。
• 当左侧变量数大于右侧数组长度时，多出的变量会得到 nil。
• 右侧数组元素也可以是数组；拆出来的变量会直接得到对应子数组。
• 多参数赋值也可以出现在函数调用参数里。
• 截至 2026-04-15 的最小验证里，{$Explicit+} 开启后，后续变量必须先用 var 声明；未声明变量会报 variable not defined。

已验证语法

默认变量模型：

代码块身份：已验证可执行示例

a := 1;
b := array(1, 2, 3);

显式 var 写法：

代码块身份：已验证可执行示例

var a;
a := 1;

{$Explicit+} 下的显式声明：

代码块身份：已验证可执行示例

program test;
begin
{$Explicit+}
    var a;
    a := 1;
    WriteLn(a);
end.

顶层最稳的常量写法：

代码块身份：已验证可执行示例

const value := 1;

顶层 const := 也可以写常量表达式：

代码块身份：已验证可执行示例

const value := 1 + 2 * 3;
WriteLn(value);

函数内部 const 段：

代码块身份：已验证可执行示例

function Demo();
const MaxRetries = 1 + 2 * 3;
begin
    return MaxRetries;
end;

unit 接口常量：

代码块身份：已验证可执行示例

unit DemoUnit;
interface
const value = 1;
function GetValue();
implementation
function GetValue();
begin
    return value;
end;
end.

类成员常量：

代码块身份：已验证可执行示例

type DemoType = class
    const value = 1;
end;

顶层 const = 只有在“后面继续接可执行语句”的脚本模型里才已验证成立：

代码块身份：已验证可执行示例

const MaxRetries = 3 + 4;
value := MaxRetries;

代码块身份：已验证可执行示例

var a;
a := 1;

多参数赋值：

代码块身份：已验证可执行示例

[r1, r2] := array(1, 3, 5, 7, 9);
WriteLn(r1);
WriteLn(r2);

已验证运行结果：

• 依次输出 1、3

单变量拆包时，末尾逗号不能省略：

代码块身份：已验证可执行示例

[re, ] := array(1, 2, 3, 4);
WriteLn(re);

已验证运行结果：

• 输出 1

左侧变量比右侧数组更长时，多出的变量为 nil：

代码块身份：已验证可执行示例

[r1, r2] := array(1);
WriteLn(r1);
WriteLn(r2 = nil);

已验证运行结果：

• r1 输出 1
• r2 = nil 输出 1

右侧元素也可以是数组：

代码块身份：已验证可执行示例

[r1, r2] := array((1, 2), (3, 4));
WriteLn(r1[0]);
WriteLn(r1[1]);
WriteLn(r2[0]);
WriteLn(r2[1]);

已验证运行结果：

• 依次输出 1、2、3、4

函数返回数组后也可以直接拆包：

代码块身份：已验证可执行示例

program test;
function PairAdd(a, b);
begin
    return array(0, a + b);
end;
begin
    [error, re] := PairAdd(3, 4);
    WriteLn(error);
    WriteLn(re);
end.

已验证运行结果：

• 依次输出 0、7

函数参数里也可以使用多参数赋值：

代码块身份：已验证可执行示例

program test;
function Test(a, b, c);
begin
    return a + b + c;
end;
begin
    WriteLn(Test(e := 3, [f, g] := array(1, 2), g));
end.

已验证运行结果：

• 输出 6

最小可编译示例

如果你只是想先落一个可续写的普通变量和顶层常量骨架，用下面这组：

代码块身份：已验证可执行示例

const MaxRetries := 3;
counter := MaxRetries;
items := array(1, 2, 3);

常见误写

• 以为普通变量必须先写 var 才能使用。
• 以为 const = 和 const := 只是初始化方式不同，可以在任何上下文里互换。
• 以为 const = 顶层单独写一行就一定成立。
• 以为单变量拆包可以写成 [a] := array(...)。
• 以为 {$Explicit+} 开启后仍然可以继续直接写未声明变量。

代码块身份：反例 / 不可照写

const value := 1;
value := 2;

上面这类写法会编译失败，报错点在重新赋值这一行。

代码块身份：反例 / 不可照写

const value = 1;

上面这类“顶层单独一行”的 const = 在当前解释器里也会编译失败。

代码块身份：反例 / 不可照写

[re] := array(1, 2, 3);

上面这种单变量拆包写法在当前解释器里会报 left side can not be assign to。单变量时必须写成 [re, ] := ...。

代码块身份：反例 / 不可照写

program test;
begin
{$Explicit+}
    a := 1;
end.

上面这类写法在当前解释器里会编译失败，主因是 variable not defined。

跳转指引

• 回看基本类型：见 04_values_and_literals.md
• 进入表达式：见 07_expressions_and_operators.md
• 看词法和编译选项：见 18_lexical_structure_and_compile_options.md
• 看类型与转换：见 19_types_and_conversions.md