Динамические массивы в Delphi
Объявлениеvar My_Array : array of Integer;
Установка размера массиваSetLength(My_Array,100);
Получение числа элементов массиваn:=Length(My_Array);
Обращение к первому элементу массиваMy_Array[0]:=10;
x:=My_Array[0]; Двумерный массив
Объявлениеvar A : array of array of integer;
Установка размера массиваSetLength(A,5,7);
Обращение к первому элементу массиваA[0,0]:=10;
x:=A[0,0]; Установка размеров отдельных рядов
SetLength(A[0], 5);
SetLength(A[1], 7);
SetLength(A[2], 3);
Источник: http://www.realcoding.net/article/view/142 |