如何将另一个类设置为TComponent的后代类的属性

时间:2015-04-09 22:09:22

标签: delphi properties object-inspector

我定义了我的第一个组件,我希望可以使用TMyOptions类实例来配置它们。

TMyCmp = class(TComponent)
protected
  FMyOptions : TMyOptions;
  ...
published
  property MyOptions : TMyOptions read FMyOptions write FMyOptions;
  ...
end;

构造函数中的每个组件都创建一个TMyOptions实例,其定义如下:

TMyOptions = class
protected
   FMyOption1 : boolean;
   FMyOption2 : boolean;
published
   property MyOption1 : boolean read FMyOption1 write FMyOption2;
   property MyOption2 : boolean read FMyOption2 write FMyOption2; 
end;

因此,在对象检查器中,我可以看到TMyOptions,但我无法更改值。 有人能告诉我哪个是实现目标的正确方法吗? 谢谢大家。

0 个答案:

没有答案