在类Delphi中创建类似TFont.Style的Param

Question

如何在将项目分组的Delphi中创建类似于TFont.Style的参数

例：

TFont.Style = [fsBold, fsTialic]
TMyTest.Type = [Item1, Item2, Item2]

如何在Delphi类中创建它？

Answer 1

这些是集合 。 集合是根据枚举定义的。 定义一个枚举，然后定义一个集合。 例如：

type
  TAndreEnum = (Item1, Item2, Item3);
  TAndreEnums = set of TAndreEnum;

现在，您可以将字段或属性定义为TAndreEnums类型。