delphi - 可以在一行中初始化某种类型的多个变量吗？

Question

我一直在尝试编写尽可能少的代码。 所以，我使用:

MyBoolean := Memo1.Text <> '';

而不是

if Memo1.Text = '' then
  MyBoolean := true
else
  MyBoolean := false;

声明并初始化

var
  myGlobal: integer = 99;

声明并初始化全局变量。我想对局部变量做同样的事情，但似乎不可能，所以，我想知道是否有一种方法可以在一行中初始化某种类型的多个变量，就像在 C 中一样

int x, y, z;
x=y=z=0;

谢谢。

Answer 1

在 C 中，赋值是一个表达式(返回一个值)。

在 Pascal 中，赋值是一个语句(不返回值)。

这种差异会带来一些有趣的后果。例如，在 C 中，两者

while (x=0)

和

while (x==0)

在 Pascal 中是语法上有效的结构(这是无数错误的根源)

while (x:=0)

在语法上无效，因为 x:=0 是一个语句。