Ver Mensaje Individual
  #2  
Antiguo 03-03-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
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.
Responder Con Cita