TOBJECTLIST DELPHI ПРИМЕР
В Delphi TObjectList представляет собой список объектов, позволяющий хранить внутри одного контейнера объекты различных классов. Это удобно тем, что вам не нужно создавать новый список для каждого класса объектов, которые вы хотели бы добавить. Вместо этого вы можете добавить каждый объект в один список.
Для того чтобы начать работать с TObjectList, создайте экземпляр класса и заполните его объектами:
var MyList: TObjectList;begin MyList := TObjectList.Create; MyList.Add(TMyObject1.Create); MyList.Add(TMyObject2.Create); MyList.Add(TMyObject3.Create);end;
Метод Add добавляет переданный объект в список. Объекты можно извлекать из списка по индексу:
var MyObject: TMyObject2;begin MyObject := MyList[1] as TMyObject2;end;
Когда вы извлекаете объект из списка, он все еще остается в списке. Если вы хотите удалить объект из списка, используйте метод Remove:
var MyObject: TMyObject2;begin MyObject := MyList[1] as TMyObject2; MyList.Remove(MyObject);end;
Вместо создания экземпляра каждого объекта отдельно вы можете использовать метод OwnsObjects класса TObjectList, который управляет памятью каждого объекта в списке. Если этот параметр равен True (значение по умолчанию), то при разрушении списка удаляются все его объекты по очереди:
var MyList: TObjectList;begin MyList := TObjectList.Create(True); // автоматически удаляет объекты MyList.Add(TMyObject1.Create); MyList.Add(TMyObject2.Create); MyList.Add(TMyObject3.Create);end;
GENERICS NO DELHPHI (delphi-hlp.rutions - TObjectList)
Delphi TObjectList, пример создания панели быстрого запуска
TGridPanel Shortcuts - Delphi #204
Learn to code in Delphi - Part 7 - Input Process Output
TObjectList: Como trabalhar com coleções de objetos no Delphi
List Box component in Delphi
TTreeView Check Boxes - Delphi #194
Delphi #175 - TVirtualImageList and TImageCollection