是否可以单独声明 const 数组项值

Question

给定以下枚举：

type TEnum = (teA, teB, teC);

我想声明一个 TEnum 的 const 数组，但是我发现以下数组项和枚举项之间的连接相对难以阅读和维护（显然我知道我可以详细评论并给出每个项目都有自己的一行）：

const AN_ARRAY : array[TEnum] of Integer = (1, 12, 146);

有没有办法像这样声明一个 const 数组？

const
  AN_ARRAY : array[TEnum] of Integer : 
    AN_ARRAY[teA] = 1,
    AN_ARRAY[teB] = 12,
    AN_ARRAY[teC] = 146
  ;

理想情况下我想设置枚举 ord 值并且根本不使用数组，但这意味着我然后 can't use TypeInfo 来操作枚举。

Answer 1

没有。数组常量的索引总是隐含的。如果您需要在它们对应的值旁边查看它们，请将它们包含在 cmets 中，但要注意 cmets 可能与实际代码不同步，编译器不会就此发出警告。

const
  AN_ARRAY : array[TEnum] of Integer = (
    1,  // teA
    12, // teB
    146 // teC
  );

Answer 2

这是另一种方法：

type
  TEnum = (teA, teB, teC);

const
  teAVal = 1;
  teBVal = 12;
  teCVal = 146;

const
  AN_ARRAY : array[TEnum] of Integer = (teAVal, teBVal, teCVal);