For Schleife über Set bringt Fehler!!

[Master_BB]

Hallo,
bei Folgendem Code kommt folgende Fehlermeldung, aber eigentlich sollte es doch möglich sein eine For schleife über ein Set
laufen zu lassen.

Delphi-Quellcode:

procedure bla;
type
  TTIMSet = 'A'..'D';
var
  ASetIndex   : TTIMSet;
  ATIMSet     : Set of TTIMSet;
begin
  for ASetIndex in ATIMSet do
  begin
     //mache was
  end;
end;

Fehlermeldung für die zeile mit "for ASetIndex in ATIMSet do" ist
"FOR-Schleifenvariable muss eine einfache lokale Variable sein".

Warum geht es nicht? Ich will durch ein Set mit Buchstaben A bis D laufen mehr nicht.

Gruß