Nemt ? vedr. en for løkke

Jeg har en for løkke som går fra I=2 til J. I for-løkken er en if sætning. Hvis den er opfyldt vil jeg gerne gave at for løkken starter forfra, dvs. I=2 og ikke fortsætte med løkken. Løkken skal kun forsætte hvis if sætningen ikke er opfyldt...Nogen ideer?

      if J = 1 then
        ErrorLocations[J-1] := BitNumber
      else
        begin
          for I := 2 to J do
            if BitNumber = ErrorLocations[J-I] then
              BitNumber := Random(NumberOfBits+1);
          ErrorLocations[J-1] := BitNumber;
        end;