如何向我的 VCL 组件添加按钮

Question

我已经创建了一个组件，现在我想向它添加一个按钮。
我试图创建这样的按钮：

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

  FButton := TButton.Create(Self);
....
End;

但按钮不显示。
我该怎么做？

Answer 1

您不仅需要Create() 按钮，还需要将其Parent 属性设置为您的组件：

FButton.Parent := Self;