Var // Определение динамического массива byteArray : Array of Byte; // Одномерный массив multiArray : Array of Array of string; // Многомерный массив

i,j: Integer;

begin
// Установка длины одномерного массива
SetLength(byteArray, 5);

// Показ размера и диапазона этого массива
ShowMessage('Длина byteArray = '+IntToStr(Length(byteArray)));
ShowMessage('Самый маленький элемент byteArray = '+IntToStr(Low(byteArray)));
ShowMessage('Самый большой элемент byteArray = '+IntToStr(High(byteArray)));

// Заполнение этого массива - помните, что динамические массивы начинаются с 0
for i:= 0 to 4 do
byteArray[i]:= i * 5;

// Показ выбранных элементов массива
ShowMessage('byteArray элемент 2 = '+IntToStr(byteArray[2]));
ShowMessage('byteArray элемент 4 = '+IntToStr(byteArray[4]));

// Установка длины 1-ого измерения многомерного массива
SetLength(multiArray, 3);

// Установка различной длины этих 3 подмассивов
SetLength(multiArray[0], 1);
SetLength(multiArray[1], 2);
SetLength(multiArray[2], 3);

// Установка и показ всех элементов этого массива
for i:= 0 to High(multiArray) do
for j:= 0 to High(multiArray[i]) do
begin
multiArray[i,j]:= IntToStr(i+j);
ShowMessage('multiArray['+intToStr(i)+','+intToStr(j)+'] = '+
multiArray[i,j]);
end;
end;

Динамические массивы – это неявные указатели и обслуживаются тем же самым механизмом, который используется для обработки длинных строк (long strings). Чтобы освободить память, занимаемую динамическим массивом, присвойте переменной, которая ссылается на массив, значение nil: A:=nil.

3. Открытые массивы

И статические и динамические массивы можно передать подпрограммам как параметры. Если определение параметра массива не имеет никакого диапазона (то есть, динамический тип массива), то вы должны, как это ни парадоксально передавать статический массив как параметр. Такой массив упоминается как Открытый массив. Delphi передает длину как скрытый параметр для подпрограммы.

Открытый массив также может быть определен типом значения константы. Это называют Различным (Variant) открытым массивом - это, главным образом, используется для разрешения передачи подпрограмме переменного числа значений аргументов.

Для передачи Динамического массива ссылкой, массив и подпрограммное определение массива должны быть через определение типов массива.

Не нашли, что искали? Воспользуйтесь поиском: