| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
форум | следующая ветвь »
Создание свойства нового компонента
Aleksandr © (2006-12-16 20:03:00)Здравствуйте уважаемые мастера Delphi. Я создаю новый компонент и хочу добавить в него новое свойство, которое могло бы раскрыватся (+) и появлялись дополнительные поля разных типов. Как это зделать? Заранее спасибо.
DimaBr (2006-12-18 09:17:00) [1]
TMyGroup = class(TPersistent)
private
fIntegerProperty: integer;
fStringProperty: string;
published
property IntegerProperty: integer read fIntegerProperty write fIntegerProperty;
property StringProperty: string read fStringProperty write fStringProperty;
end;
TMyComponent = class(TComponent)
private
fMyGroup: TMyGroup
published
property MyGroup: TMyGroup read fMyGroup write SetMyGroup;
end;
constructor TMyComponent.Create();
begin
inherited;
fMyGroup := TMyGroup.Create;
end;
destructor;
begin
fMyGroup.Free;
inherited;
end;
Юрий Зотов (2006-12-16 22:02:00) [2]Свойство-объект. Наследовать от TPersistent или его наиболее подходящего потомка.
Примерв объектных свойств см. в мсходниках VCL, там таких много. Слово "сделать" пишется через "с".
:o)
| |
