For Schleife über Set bringt Fehler!!

[Sharky]

Zitat von Hansa:

Ne. Die for-Schleife geht über das i und nicht über das SET. Kleiner, aber feiner Unterschied !...

Über welches i?

Delphi-Quellcode:

  
type
  TLottozahlen = 1..49;

var
  Lottozahlen: set of TLottozahlen = [];  // leere Menge
  z: TLottozahlen;


for z in Lottozahlen do
    Writeln(z);

EDIT!!
Diesen Code hier kann ich ohne Fehler compilieren:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
type
  TLottozahlen = 1..49;
var
  Lottozahlen: set of TLottozahlen;  // leere Menge
  z: TLottozahlen;
  i: Integer;
begin
  for i := 1 to 49 do  // Ersteinmal Werte in das SET schreiben.
  begin
    Lottozahlen := Lottozahlen + [i];
  end;

  for z in Lottozahlen do  // Und jetzt über jeden Eintrag des Set laufen
  begin
     ListBox1.Items.Add(IntToStr(z));
  end;
end;