Как создать двумерный динамический массив?

Posted by Chas under Delphi

_Dmitry

//Объявляешь массив

var

  M: array of array of real;

//..........................

//Выделяешь для него память

SetLength(M,5,5);

//Получается массив [0..4,0..4], индексация всегда с 0

//Работаешь с массивом как обычно

M[2,3]:=2.18;

//...........................

//Освободить память

M:=NIL;

В отличии от статического массива, который всегда прямоугольный, размерность динамического массива может быть сложной. Тогда выделять память нужно следующим образом:

SetLength(M,5);

SetLength(M[0],4);

SetLength(M[1],1);

SetLength(M[2],3);

SetLength(M[3],2);

SetLength(M[4],5);

В результате массив будет следующим:
* * * *
*
* * *
* *
* * * * *
Например, элемента M[1,1] не существует (индексация с 0!!!).

тема на форуме

Похожие статьи

• Выделить память под динамический массив
• Динамические массивы Turbo Pascal
• Использование нетипизированного указателя для передачи массива
• Как перемешать массив, заполненный английским алфавитом?
• Пример заполнения динамического массива
• Создать динамический массив внутри функции так, чтобы он потом не уничтожился
• Работа с двумерными массивами (матрицами) средствами Delphi
• Как передать динамический массив Tbitmap в процедуру
• Сдвиг элементов динамического массива после удаления элемента
• Запись данных в файла из массив с помощью FileStream