delphi - Delphi 中是否可以将枚举合并为更大的枚举？

Question

Delphi 可以有枚举类型，e.g.:

type
   TDay = (Mon, Tue, Wed, Thu, Fri, Sat, Sun);   // Enumeration values

是否可以联合枚举类型:

type
   TWeekDay    = (Mon, Tue, Wed, Thu, Fri);
   TWeekendDay = (Sat, Sun);
   TDay        = (TWeekday, TWeekendDay);    //hypothetical syntax

实际上，我需要将一个大列表分解为它们实际上是不相交的项目，而不破坏源代码兼容性:

type
   TWeekDay =    (Mon, Tue, Wed, Thu, Fri);
   TWeekendDay = (Sat, Sun);
   TDay =        (Mon, Tue, Wed, Thu, Fri, Sat, Sun); //identifier redeclared syntax error

然后更改一些变量:

• 日:TWeekday; TDay;
• 日:TWeekendDay； TDay

这在道德上相当于 strict typing. ^🕗

Answer 1

答案是“否”。

但是，如果子范围是连续的，您可以使用一个解决方法:使用子范围:

TDay = (Mon, Tue, Wed, Thu, Fri, Sat, Sun); 

TWeekDay2 = Mon..Fri; 
TWeekday = type TWeekDay2;

TWeekendDay2 = Sat..Sun;
TWeekendDay = type TWeekendDay;