Arrays 如何在pascal中制作多行数组

我制作了一个基本数组，如下所示。我可以每行制作一个数组吗？没有双引号和逗号

 var
  Month: array [1 .. 5] of string = ('January', 'February', 'March', 'April', 'May');
begin
  Write(Month[4]);
  Readln;
end. 

可能是这样

Month: array [1 .. 5] of string = (
January
February
March
April
May
)

begin
  Write(Month[4]);
  Readln;
end.

---

问候。

不，你想要什么是不可能的。语法不允许这样做

您可以执行以下操作：

const
  Month: array[1..5] of string = (
    'January',
    'February', 
    'March', 
    'April',
    'May'
  );

---

但不是你想要的。行尾（或任何其他空格）不是合适的分隔符，字符串必须始终用单引号括起来，数组元素（常量数组）必须用逗号分隔。

不，Pascal类型的系统不允许这种混乱，如果我想使用一千个数组，还有其他选择吗？如果你有非常大的字符串集，将它们存储在文本文件中并加载到TStringList或arraythanks中，我将尝试：）通过将月份声明为枚举并使用TypInfo单元中的GetEnumName返回字符串，您可以非常接近您想要的结果。