20.1. Класс tList

Он представляет собой массив нетипированных указателей и может использоваться для хранения любых данных. Этот класс является прямым потомком класса TObject. Основными его свойствами являются:

Property Capacity:Integer; – характеризует начальный размер массива указателей. Если число элементов списка превысит это значение то в динамической памяти будет выделено место под новый массив с увеличенным на Capacity числом указателей, туда будут переписаны все старые указатели и старый массив будет уничтожен. Поэтому нужно заранее приблизительно знать размер будущего списка для сокращения времени вычислений;

Property Count:Integer; – текущее количество элементов списка;

Property Items [Index: Integer]: Pointer; – это как раз и есть массив указателей. Элементы массива нумеруются с нуля;

Property List: PPointerList; – указатель на начало массива указателей.

Рассмотрим некоторые методы данного класса:

Function Add(Item: Pointer): Integer; – функция добавления нового элемента списка Item в конец списка. Она возвращает номер этого элемента в списке;

Procedure Clear; – очищает список, но не освобождает память, которую занимали отдельные элементов списка;

Procedure Delete(Index: Integer); – удаляет из списка указатель на элемент с номером Index;

Procedure Insert(Index: Integer; Item: Pointer); – вставка нового элемента Items перед элементом с номером Index.

Другие методы этого класса рассматривать не будем.