delphi - 为什么枚举类型会出现 "type has no typeinfo"错误

Question

我声明了以下枚举类型，我希望其中第一个成员的序数值为 1(一)而不是通常的 0(零):

  type
    TMyEnum = (
               meFirstValue = 1,
               meSecondValue,
               meThirdValue
              );

如果我调用TypeInfo()，例如作为调用 GetEnumName() 的一部分，我收到编译器错误:

  GetEnumName(TypeInfo(TMyEnum), Ord(aValue));

错误:“E2134:类型“TMyEnum”没有类型信息”

这是为什么？

我知道类只有在启用 $M 编译器选项的情况下编译时才具有类型信息，或者(派生自某个类，例如 TPercient)，但我认为枚举类型的 typeinfo 没有任何特殊条件。

Answer 1

不连续的枚举和不从零开始的枚举没有类型信息。为了实现 typeinfo，由于向后兼容性问题，它需要采用与现有 tkEnumeration 不同的格式。

我考虑为 Delphi 2010 实现一个 tkDiscontigouslyEnumeration (或者可能更好的命名成员)，但考虑到它们的相对稀缺性和枚举的困难，好处似乎很小 - 如何有效地对范围进行编码？某些编码对于某些场景更好，而对于另一些场景则更差。