delphi - 创建自己的组件时如何在设计时在结构视图面板中隐藏子组件（隐藏)

Question

我正在创建从 TControl (Firemonkey) 继承的简单组件。在构造函数中我写道：

constructor TControl1.Create(AOwner: TComponent);
begin
  inherited;

  fTest := TLayout.Create(Self);
  fTest.Parent := Self;
end;

当我将此组件放置到表单时，结构列表如何将 Tlayout 显示为 <components 1 > 的子组件。我该如何隐藏它？见截图。

标签： delphi

Answer 1

利用

1. SetSubComponent(True);

2. Owner一定是Self

constructor TControl1.Create(AOwner: TComponent);
begin
  inherited;

  fTest := TLayout.Create(Self);
  fTest.SetSubComponent(True);
  fTest.Parent := Self;
end;

这里也有类似的问题：

如何在设计时禁用子控件？