Italian community of Lazarus and Free Pascal

Il codice inseriva nella riga 0 dell'array alla posizione 15 il valore 2 e allungava la riga 0 di una posizione che diventa lunga quindi 21 elementi.
Le altre righe rimangono con 20 elementi.

Se parli di array multidimensionali, le opzioni sono molto limitate.
Tutte le funzioni sono pensate per array mondimensionali, eccetto per la funzione SetLength che lavora su tutti i "vettori" in una unica istruzione.

Le "operazioni" (Insert o Delete ad esempio) lavorano sul singolo indice, faccio un esempio:

Codice: [Seleziona]

var a: array of array of integer;

begin
  //10 righe 20 colonne
  SetLength(a, 10, 20); //DEVE ESSERE SEMPRE EFFETTUATO ALMENO UNA VOLTA INIZIALMENTE.
                                  //L'ARRAY VIENE ISTANZIATO EFFETTIVAMENTE CON QUESTA ISTRUZIONE 
  //Inserisce un elemento alla posizione 15 della prima riga dell'array (ovvero a[0][15]) con il valore 2
  //Dopo questo inserimento la prima riga (cioè a[0]) avrà 21 elementi.
  //Le altre 9 righe avranno sempre 21 elementi
  Insert(2, a[0], 15);
  //NON PUOI INSERIRE NUOVE "RIGHE" CON INSERT
end;

Se questo è ciò che vuoi, allora c'è l'hai.

 SetLength(a, 10, 20);

  Insert(2, a[0], 15);
  for j:= 1 to 19 do
  begin
     a[0,j]:= 'datox';
  end;