delphi - 如何填充 Delphi 集？

Question

如果我将类型定义为枚举类型的集合，则可以轻松使用 [] 创建空集，但如何创建完整集？

编辑:是的，明显的解决方案是使用 for 循环。如果有其他方法的话，这也是一个非常糟糕的解决方案。有谁知道一种可以在恒定时间内起作用的方法？

Answer 1

Low() 和 High() 是可以在编译时评估的“编译器魔法”函数。这允许它们在常量声明中使用，如下所示:

var  MySet : TBorderIcons;  MySet2 : TBorderIcons;const  AllIcons : TBorderIcons = [Low(TBorderIcon)..High(TBorderIcon)];begin  MySet := [Low(TBorderIcon)..High(TBorderIcon)];  MySet2 := AllIcons;end;