Повтор цикла for [Delphi7]

[-Jack-]

Всем доброго времени суток. Столкнулся с таким вопросом, можно ли как-то повторить цикл с определенным (I), т.е. при I:=2 возникает ошибка, и при возникновении ошибки повторить цикл с этим I.

procedure TForm1.Button1Click(Sender: TObject);
var
I, I1 : Integer ;
begin
A1:=3;
for I:=1 to I1 do
    begin
        try
            ... 
        finally
            ...
        end;
    end;
end;

[Alex11223]

Что? Ничего не понятно.

try
...
except
  continue;
end;

что ли?

[kangreon]

  I := 1;
  while I <= I1 do
  begin
    try
      ...
    except
      Continue;
    end;
    Inc(I);    
  end;

[alekola]

не уверен но может так:?
try
for i=0 to N do
..
except
for j:=i to n do
end;
отловится лишь 1 раз на сколько я понимаю

[-Jack-]

Через for реализовать не получилось, сделал через while I <= I1 do ( спасибо kangreon, подкинул идею ). И поставил проверку, в том случаи если ошибки нет, I:=I+1, если же ошибка появляется, то I остается неизменным.