Delphi:如何拥有非连续子范围枚举类型？

Question

虽然以下子范围枚举声明有效:

type
   TReceiptCode = 'A'..'F';

这不会:

type
   TReceiptCode = ' ','A'..'F', 'R';

也没有

type
    TReceiptCode = ' ','A','B','C','D','E','F','R';

如何声明具有非连续值的子范围类型？

Answer 1

不幸的是，我认为没有任何办法可以做到这一点。您可以声明一个(新的)非连续枚举，或现有类型的子范围，但不能同时声明两者。