[[Lepe]]

Yo personalmente usaria un record para almacenar todo

Código Delphi [-]
type  Tdatos = record
     articulo : integer;
     color : integer;
     talla:....
end;

var a : array of Tdatos;

procedure mio;
begin
//  cuando lo necesites:
   setlength(a,variable nuevo tamaño);
// el indice inicial es 0, los datos que haya, se preservan.
end;