FOR - Schleife mit unterbrechung

[Marcel2906]

Zitat:

Zitat von Bummi (Beitrag 1136670)

Delphi-Quellcode:

for i in [1..2,5..8] do .....

genau so etwas hatte ich mir vorgestellt :)

[DeddyH]

Allerdings haben alle Varianten mit dem "in" den gleichen Nachteil: i muss sich im Byte-Bereich bewegen.

[himitsu]

Du kannst statt dem SET auch ein Integer-Array verwenden ... läßt sich ja notfalls auch live deklarieren.

http://www.delphipraxis.net/1134380-post577.html

[Bummi]

oder auch

Delphi-Quellcode:

Type
  TI=Array of Integer;
var
  i:INteger;
begin
  for I in TI(VarArrayOf([1,2500,700])) do Memo1.Lines.add(IntToStr(i));
end;

[DeddyH]

Oder auch:

Delphi-Quellcode:

procedure TForm1.DoSomethingSenseless(Values: array of integer);
var
  i: integer;
begin
  for i := Low(Values) to High(Values) do
    Memo1.Lines.Add(IntToStr(Values[i]));
end;

Das dürfte auch in älteren Delphi-Versionen funktionieren.