Créer TFont.Style similaire Param classe Delphi

Question

Comment puis je créer ce paramètre TFont.Style similaire à Delphes où je grouper les éléments

Exemple :

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

Comment dois-je créer dans ma classe Delphi ?

Answer 1

Ce sont séries. Un ensemble est défini en termes d'énumération . Définissez une énumération, puis définissez un ensemble. Par exemple:

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

Maintenant, vous pouvez définir votre champ ou une propriété en tant que type TAndreEnums.