Gracias daniel, en todo caso es un ejemplo que puse solamente, el real es mucho mas complejo, la idea central que la función
SetLength no deja ridemensionar varias veces el mismo array con diferentes posiciones por ejemplo:
Código Delphi
[-]SetLength(Numeros,10);
..
..
..
SetLength(Numeros,20);
Una vez gracias Daniel.