for .. in -Schleife

[himitsu]

also bei mir geht dein Code

D2009 ... sicher daß es in D2006 (TurboDelphi) auch schon drin ist?


[edit]
etwas unefektiver, aber dafür in allen Delphi-Versionen lauffähig:

Delphi-Quellcode:

for ElementX := Low(ElementX) to High(ElementX) do
  if ElementX in [foWaermeuebergang1, foWaermeuebergang2] then
  begin
    ...
  end;