Lib_adata - Несколько строчных динамических массивов, каждый из которых имеет свой размер.
procedure define(countMass: integer);
Задает необходимо количество динамических массивов, в процессе работы программы можно увеличивать или уменьшать. При уменьшении, оставшиеся не изменяются.
function count: integer;
Возвращает количество countMass массивов.
procedure init(indexMass: integer);
Инициализирует новый массив заданный indexMass или очищает существующий.
indexMass должен лежать в пределах 0..count-1.
procedure additem(indexMass: integer, strItem: string);
Добавляет строку strItem в массив заданный indexMass. Если массив[indexMass] не инициализирован, инициализирует его автоматом.
procedure setitem(indexMass: integer, indexItem: integer, strItem: string);
Изменяет строку с индексом indexItem на strItem в массиве[indexMass].
indexItem должен лежать в пределах 0..getsize(indexMass)-1. Если параметры заданы неверно (индексы за пределом размера массива и т.д., например) - ничего не делает
, программа не падает, аналогично для других процедур.
procedure delitem(indexMass: integer, indexItem: integer);
Удаляет строку с индексом indexItem в массиве[indexMass], строки с большим индесом сдигаються вверх.
function getitem(indexMass: integer, indexItem: integer): string;
Возвращает строку с индексом indexItem из массива[indexMass]. В случае не правильных индексов возвращает пустую строку.
function getsize(indexMass: integer): integer;
Возвращает размер массива[indexMass]. В случае не правильного индекса возвращает 0.