[Risolto] array dinamici bidimensionali a lunghezza variabile

[petrusic]

Gli array dinamici sono già gestibili a lunghezza variabile, d'accordo, ma  io intendo riferirimi alla lunghezza della 2^a dimensione, per cui, un array dichiarato

Codice: [Seleziona]

type
TtbvariabiliMono = array of array of Variant

var
tbvariabiliMono: TTtbvariabiliMono

begin
 setLength(Form6.tbvariabiliMono, 5, 7);

dopo l'struzione setLength ha una struttura  composta da 5 righe e 7 colonne per tutto il tempo occorrente, e solo alla fine di detto periodo verrà ristrutturata con un'altra coppia di numero di righe e di colonne.

Benissimo io invece avrei bisogno di una struttura del tipo

Codice: [Seleziona]

 setLength(Form6.tbvariabiliMono, 50, x)

dove x dovrebbe potere essere, per es.,:

• un sottolivello di 4 colonne della riga 5,
• un sottolivello di 8 colonne della riga 6,
• un sottolivello di 2 colonne della riga 7,
. . .

 
Personalmente non ho esperienza pratica, ma, per quanto letto e vissuto nella mia lunga vita di programmatore, non ho mai trovato riferimenti a quanto servirebbe a me.

Probabilmente potrei orientarmi su una struttura di tipo record, ma non ho mai affrontato la gestione di strutture di quel tipo.

Volendo rimanere nel campo degli array, potrei realizzare una struttura come quella pensata ora da me?

[DragoRosso]

Puoi fare così:

Codice: [Seleziona]

type
  TTtbvariabiliMono = array of array of Variant;

var
  tbvariabiliMono: TTtbvariabiliMono;

begin
  SetLength(tbvariabiliMono, 7, 7);
  SetLength(tbvariabiliMono[4], 4);
  SetLength(tbvariabiliMono[5], 8);
  SetLength(tbvariabiliMono[6], 2);
end.

[petrusic]

Puoi fare così:

Codice: [Seleziona]

type
  TTtbvariabiliMono = array of array of Variant;

var
  tbvariabiliMono: TTtbvariabiliMono;

begin
  SetLength(tbvariabiliMono, 7, 7);
  SetLength(tbvariabiliMono[4], 4);
  SetLength(tbvariabiliMono[5], 8);
  SetLength(tbvariabiliMono[6], 2);
end.

Sbalorditivo! Non lo sapevo. Ho capito. 
G R A Z I E