Problemas con el error: access violation at 0x77d9dede: write of address 0x00090fec

[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.

[Casimiro Notevi]

¿Y qué es la R del bucle?, ¿cuánto vale?, ¿de dónde saca el valor?

Código Delphi [-]
for i := 1 to R do

[TecnoBestia]

Es una variable global, tiene un valor de 3.

[TecnoBestia]

De hecho, el for no importa, lo he quitado y el problema se da al redefinir el tamaño del vector. De hecho, el código dado por:

procedure clsHormiga.CamineYClasifique();
    var
      i,NumDeNodo:Integer;
      Suma:Double;
      VecDeProbabilidades:VectorIR;
    begin
      SetLength(VecDeProbabilidades,3);
    end;

El problema se sigue dando, el mismo para ser preciso.
Gracias por responder.

[Casimiro Notevi]

¿Y por qué usas VecDeProbabilidades en lugar de VectorIR?

[ecfisa]

Hola.

Te faltó incluir algo importante. De tu código se podría inferir que VectorIR está declarado como:

Código Delphi [-]
type
   VectorIR = array of Integer;

Pero si fuera así, las líneas:

Código Delphi [-]
var
  VecDeProbabilidades:VectorIR;
begin
  SetLength(VecDeProbabilidades,3)
end;

no generarían ningún error...

¿ Que es VectorIR ?

Saludos.