Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.31;
Скачать: CL | DM;

Вниз

Сохранение свойств вложенных компонентов   Найти похожие ветки 

 
VaS ©   (2003-03-20 10:47) [0]

Цель - сохранение свойств вложенного компонента.


type
TInside = class(TComponent)
private
FOne: integer;
published
//свойство, которое надо сохранить
property One: integer read FOne write FOne;
end;

TTest = class(TComponent)
private
//вложенный компонент
FInside: TInside;
public
constructor Create(AOwner: TComponent); override;
published
property Inside: TInside read FInside;
end;

procedure Register;
begin
RegisterComponents("TestPage", [TTest]);
end;

constructor TTest.Create(AOwner: TComponent);
begin
inherited;
FInside := TInside.Create(self);
FInside.FreeNotification(self);
end;


Не сохраняется свойство :( Почему? Через DefineProperties() шибко муторно. Пытался в этом плане копать TLabeledEdit - не нашел где же он сохраняет.


 
Mike_Goblin ©   (2003-03-20 11:03) [1]

procedure SetSubComponent(IsSubComponent: Boolean);



 
VaS ©   (2003-03-20 12:21) [2]

Спасибо, не знал.
Но сделал иначе - по аналогии с TFont - наследовал от TPersistent + редактор свойства с Attributes = [paSubProperties, paReadOnly]. Ну и перегрузил Assign().



Страницы: 1 вся ветка

Текущий архив: 2003.03.31;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.017 c
7-100499
Zhenka
2003-02-05 20:06
2003.03.31
какими методами виндовс меняет цветовые схемы в Рил-тайм??


1-100212
VaS
2003-03-20 10:47
2003.03.31
Сохранение свойств вложенных компонентов


3-100192
Sectey
2003-03-13 15:15
2003.03.31
Код ошибки


3-100197
Lans
2003-03-12 10:33
2003.03.31
Как сделать сетевой Paradox


8-100348
КапитанЪ
2002-12-24 08:38
2003.03.31
directx8.1 не работает