¿Como recorrer un conjunto?

[[seoane]]

Estoy confundido. En un conjunto no puede haber un elemento repetido, es decir:

Código Delphi [-]
var
  SetEnum: TSetEnum;
begin
  SetEnum:= [eUno,eDos];
  SetEnum:= SetEnum + [eUno]; 
  // El valor de SetEnum sigue siendo [eUno,eDos] la ultima operacion no sirvio para nada
end;

Así que no entiendo para que necesitas un bucle, algo así serviría:

Código Delphi [-]
if eUno in Conjunto then
begin

end;
if eDos in Conjunto then
begin

end;

....

if eOcho in Conjunto then
begin

end;

Puede que tu estés confundiendo un conjunto con un array o una lista.