Set-Type (also Menge) und for-in-Schleife

[himitsu]

Jupp (hatte ich ja auch schon gesagt ... Variable oder Konstante)

aber Achtung (wie ebenfalls erwähnt):
Hier wird die For-Schleife 10 Werte liefern und nicht nur 3.

Delphi-Quellcode:

type
  TMyEnum = (
    atMapping,
    atVisible,
    atNotNull = 9    
  );
  TMyEnumSet = set of TMyEnum;

const
  cAllMyEnums: TMyEnumSet
    = [Low(TMyEnum)..High(TMyEnum)];

var
  FAttributedProperties : array[TMyEnum] of TStringList;

procedure Test;
var
  AttributeType: TMyEnum;
begin
  for AttributeType in cAllMyEnums do
  begin

  end;
end;