[TecnoBestia]

Hola, tengo un problema que hace que mi programa se caiga.

Tengo el siguiente procedimiento

procedure clsHormiga.CamineYClasifique();
    var
      i,NumDeNodo:Integer;
      Suma:Double;
      VecDeProbabilidades:VectorIR;
    begin
      SetLength(VecDeProbabilidades,3);
      for i:=1 to R do begin
        VecDeProbabilidades[i-1]:=1
      end;
    end;

resulta que cuando pasa por la instrucción SetLength(VecDeProbabilidades,3); se muestra el siguiente mensaje:



e inmediatamente se muestra



El problema que no sé a que se debe el error, ya muchas otras veces he trabajado con vectores y nunca me ha pasado algo similar. Si alguien puede ayudarme se los estaría muy agradecido. No tengo la menor idea de porqué o qué hacer. No entiendo los mensajes ni que hacer.

Un detalle es que
VectorIR=array of Double;

Gracias de antemano.