Delphi const 一个数组常量

在 Delphi 中可以使用 const 关键字定义一个数组常量。示例如下：

program ArrayConstant;

{$APPTYPE CONSOLE}

uses
  SysUtils;

const
  MyArray: array[0..2] of Integer = (1, 2, 3);

begin
  WriteLn(MyArray[0]); // 输出 1
  WriteLn(MyArray[1]); // 输出 2
  WriteLn(MyArray[2]); // 输出 3
end.

在上面的示例中，我们定义了一个名为 MyArray 的数组常量，它包含三个整数元素。在程序中可以像访问普通数组一样访问 MyArray 中的元素。由于 MyArray 是一个常量，所以不能修改其中的元素值。