Set durchsuchen

[xZise]

Hallo ihr,

ich habe ein Set einer Enumeration

Delphi-Quellcode:

type
  TEnum = (eA, eB, eC);
  TEnums = set of TEnum;

Nun habe ich eine Methode, die je nach Enum-Wert verschieden reagiert und eine Methode mit dem Set:

Delphi-Quellcode:

procedure DoSomething(AEnum : TEnum);
procedure DoSomethingOther(AEnums : TEnums);

Wie kann ich nun in "DoSomethingOther" die Einträge in AEnums durchgehen und mit DoSomething aufrufen?

Also sowas in der der Art:

Delphi-Quellcode:

for i := 0 to Length(AEnums) - 1 do
  DoSomething(AEnum[i]);

Ich könnte natürlich das umständlich machen, aber dass ist an sich ja ziemlich umständlich

Delphi-Quellcode:

if eA in AEnums then
  DoSomething(eA);

...

MfG
xZise