Последние записи

made in programmersforum 3

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

23rd
Ноя

Динамические массивы в Lazarus / Delphi — индексация элементов

Posted by obzor under Delphi, Lazarus, Free Pascal

Привет, приведите листинг примера создания динамического символьного массива (занесения к примеру элементы: Катя, Петя, Лена и вывод одного из них скажем в Memo1 )

uberchel

Динамический массив:

Код:

var
  i: Integer;
  arrName: array of Type; (string|integer|char|Byte и т.д)
begin
// задаем длину
setLentgh(arrName, 2);
arrName[0]:= 'Катя';
arrName[1]:= 'Петя';
arrName[2]:= 'Лена';

for i:= 0 to Length(arrName) do
memo1.lines.add(arrName);
end;

Arigato

Не проверял, но подозреваю что вы где-то ошиблись.

setLength задает количество элементов массива. Length возвращает это количество. Динамические массивы индексируются с нуля. То есть если у вас 3 элемента в массиве, то им будут соответствовать индексы: 0, 1, 2.

Чтобы перебрать все элементы, надо либо запустить цикл от 0 до Length(arrName) — 1, либо от Low(arrName) до High(arrName), что более верно и гарантирует невыход за границы массива.

Если у вас и сработал код arrName[2]:= ‘Лена’; то возможно отключена проверка на выход за границы массива. То есть ‘Лена’ оказалась за пределами массива. Вот это надо проверить. Но так писать точно неправильно.

SetLength устанавливает количество элементов. Если вы задаете количество 2 элемента, то у вас в массиве и будет два элемента с индексами 0 и 1 — http://www.delphibasics.ru/setlength.php

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