delphi - 如何制作一个不能包含其他控件的控件？

Question

我正在设计一个自定义控件，每次我在表单设计器中突出显示它，然后从控件选项板中选择另一个控件时，新控件都会出现在我的控件中，就像它是 TPanel 或 TGroupBox 一样。这不是我想要的，那么我怎样才能阻止它发生呢？

Answer 1

您需要从 ControlStyle 属性中删除 csAcceptsControls 标志，最好直接在构造函数中删除:

constructor TMyComponent.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  ControlStyle := ControlStyle - [csAcceptsControls];
  // more initialization stuff ...
end;