создание сложных компонентов

← →
DDA (2002-09-06 08:26) [0]

Почему
TTest = class (TPersistent) private fTTT : Integer; published property TTT : Integer read fTTT write fTTT; end; TDPanel = class(TPanel) private fTest : TTest; published property Test : TEdit read fTest write SetTest; end;
свойство Test сохраняется в *.dfm, а
какое-нибудь из свойств, скажем, Text, нет?
TDPanel = class(TPanel) private fTest : TEdit; published property Test : TEdit read fTest write SetTest; end;

← →
ЮЮ © (2002-09-06 08:37) [1]

>какое-нибудь из свойств, скажем, Text , нет?
Никакого Text в приведённом примере не вижу :-(

← →
DDA (2002-09-06 08:47) [2]

Извините, поспешил.

Имеем
TTest = class (TPersistent) private fTTT : Integer; published property TTT : Integer read fTTT write fTTT; end; TDPanel = class(TPanel) private fTest : TTest; published property Test : TTest read fTest write SetTest; end;

Создаем экземпляр класса TDPanel.
Так вот свойство TTT подкласса TTest сохраняется в *.dfm,
а какое-нибудь из свойств, скажем, Text, подкласса TEdit
в нижеприведенном примере - не сохраняется в *.dfm?

TDPanel = class(TPanel)
private
fTest : TEdit;
published
property Test : TEdit read fTest write SetTest; end;

← →
DDA (2002-09-06 08:55) [3]

Все. Нашел.

При создание SubComponents нужно вызывать метод

NewSubComponent.SetSubComponent(true).

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