aqui va otra de matrices!!!

[Alejo]

ke tal forajidos del foro; como estan???
espero ke bien. la pregunta ke tengo es la siguiente:
despues de definir un tipo de array dinamico:

type
Dinamico = array of array of byte;

como lo creo???

el setlenght(variable,tamaño) funciona muy bien para vectores, pero no se como utilizarla para matricez....

Alguien me puede ayudar???

Gracias!!!

[delphi.com.ar]

Eso creará un Array dinámico de Arrays dinámicos que no es estrictamente una matriz, por eso lo que tienes que hacer es "dimensionar" el array y después cada uno de los arrays dinámicos pertenecientes a este array.

En este ejemplo, dimensiono el array a 10 y cada ítem lo dimensiono según su índice:

var
  DynArray: array of array of byte;
  i: Integer;
begin
  SetLength(DynArray, 10);
  for i := 0 to 10 do
    SetLength(DynArray[i], i);

Saludos!

[andres1569]

Hola forajido forastero y forofo del foro fosforito:

Lo que pones en el código es la definción del tipo (está en la sección type). Luego te declaras una variable de ese tipo, y ahora viene la novedad. Cuando aplicas SetLength a la matriz estás delimitando el número de elementos de la primera dimensión, pero la segunda dimensión puede tener un número diferente de elementos para cada elemento de la primera dimensión. Mira este código:

type
 // acostumbra a poner la T en la declaración de un tipo
 // es más que nada por claridad
  TDinamico = array of array of byte;

var
  Dinamico : TDinamico;
begin
  SetLength (Dinamico, 20);
  SetLength (Dinamico[0], 10);
  SetLength (Dinamico[1], 20);
  SetLength (Dinamico[2], 10);
  ...
  SetLength (Dinamico[19], 15);
end;

Si te das cuenta, la matriz tiene 20 elementos en su 1ª dimensión, pero cada elemento de ésta puede tener un número diferente de elementos. Como no sabemos de antemano, por definición, cuáles son los límites de cada fila, debemos hacer uso de la función High:

for i:=0 to High(Dinamico) do
  for j:=0 to High(Dinamico[i]) do
    ...