Delphi - Cargar objetos

Hola a todos: tengo un problemilla espero que alguien comprenda este tema.
El problema es que el primero lo carga pero ya el segundo me tira error. Puse un array porque necesito cargar dinamicamente hasta 5 frames como maximo, este valor lo escribe el usuario en edtCant.text.

Espero me puedas ayudar. Muchas gracias.

**********
procedure TForm1.BitBtn1Click(Sender: TObject);
var
vIndicador: array[1..5] of TFrame2;
i, nUltimo:integer;

begin

nUltimo := strtoint(edtCant.text);

for i := 1 to nUltimo do
begin
vIndicador[i] := TFrame2.Create(self);
vIndicador[i].parent := self;
vIndicador[i].Left := 448;
vIndicador[i].top := 100;
vIndicador[i].Show;
end;

end;
**********************

La verdad, copie el codigo, lo pegue en el delphi y le sake el 2 de Tframe2 en ambos sitios y lo ejecute paso por paso y en el for me creaba mas de 3 frames sin fallos. Los cuales aparecian bien en el formulario. No se si te servira de ayuda. A mi me funciono.

...........
vIndicador: array[1..5] of TFrame;
............
vIndicador[i] := TFrame.Create(self);
........