durch verschiede Sets iterieren

[Uwe Raabe]

Zitat von haentschman:

... aber wie weise ich das Array, welches je Jahrgang verschiedene Dimensionen hat, einer Variablen zu um das Array durchzuiterieren.

Sagte ich schon: "Der Rest kann eigentlich so bleiben."

Delphi-Quellcode:

var
  BlubbSet: TArray<TBlubb>; // TBlubb = (bb1, bb2, bb3, bb4, bb5, bb6, bb7);
...
case FYear of
  2016:
    begin
      BlubbSet := [bb1, bb2, bb3, bb4, bb5];
    end;
  2017:
    begin
      BlubbSet := [bb5, bb1, bb3];
    end;
end; 
...
for IBlubb in BlubbSet do
begin
  //
end;