Класс TComponent
Класс TComponent является предком всех компонентов VCL. Он используется в качестве основы для создания невизуальных компонентов и реализует основные механизмы, которые обеспечивают функционирование любого компонента. В нем появляются первые свойства, которые отображаются в Инспекторе объектов. Это свойство:
property Name: TComponentName;
Оно содержит имя экземпляра компонента, которое используется для идентификации компонента в приложении.
Примечание
Тип TComponentName представляет собой обычную строку:
type TComponentName = type string;
Свойство property Tag: Longint; является вспомогательным и не влияет на работу компонента. Оно отдано на откуп разработчику, который может присваивать ему значения по своему усмотрению. Например, это свойство можно использовать для дополнительной, более удобной идентификации компонентов.
Для компонентов существует своя иерархия, поэтому в классе введен механизм учета и управления компонентами, для которых данный компонент является владельцем. Свойства и методы, которые отвечают за управление, приведены в табл. 2.1.
Таблица 2.1. Свойства и методы для управления списком компонентов.
| Свойство (метод) | Описание |
|---|---|
| property Components [Index: Integer]: TComponent; | Содержит индексированный список указателей всех компонентов, для которых данный компонент является владельцем (owner) |
| property ComponentCount: Integer; | Число подчиненных компонентов |
| property Owner: TComponent; | Указывается, какой компонент является владельцем данного |
| property Componentlndex: Integer; | Индекс данного компонента в списке владельца |
| procedure InsertComponent (AComponent: TComponent); | Вставляет компонент AComponent в список |
| procedure RemoveComponent (AComponent: TComponent); | Удаляет компонент AComponent из списка |
| procedure FindComponent (AName: string): TComponent; | Осуществляет поиск компонента по имени AName |
| procedure DestroyComponents; | Предназначен для уничтожения всех компонентов, подчиненных данному |