相关疑难解决方法(0)

如何使用在设计时接受其他控件的子面板创建自定义控件?

我编写了一个自定义控件,它有几个子面板.我希望这些子面板能够接受在设计时丢弃的任何其他控件.

不幸的是,在设计时掉落的任何控件都会在我的自定义控件上出现,而不是在面板上.这特别显示我是否尝试删除标签:标签的蓝点显示,但标题不是,如果我取消选择标签,则根本不再可见.

简化代码(只有一个子面板):

type
  TMyContainer = class(TPanel)
    p_SubPanel: TPanel;
  public
    constructor Create(_Owner: TComponent); override;
  end;

  constructor TMyContainer.Create(_Owner: TComponent);
  begin
    inherited;
    p_SubPanel := TPanel.Create(Self);
    p_SubPanel.Parent := Self;
    p_SubPanel.Align := alClient;
  end;
Run Code Online (Sandbox Code Playgroud)

我在这做错了什么?

(以防万一重要:我使用的是Delphi 2007.)

[编辑]

我现在已经解决了不同的问题.该组件不再包含面板,但指的是外部面板.这使它实际上更加灵活,但在不利方面,它不再直观易用.

我仍然想知道如何完成我原先描述的内容.是不是有一个开源组件可以做到这一点,所以我可以研究源代码?

delphi custom-component

6
推荐指数
1
解决办法
4377
查看次数

如何创建一个像Tpanel一样的TCustomControl?

如何创建一个像Tpanel一样的TCustomControl?例如MyCustomComponent,我可以删除类似标签,图像等组件.

delphi tpanel tcustomcontrol custom-component

1
推荐指数
1
解决办法
1470
查看次数

标签 统计

custom-component ×2

delphi ×2

tcustomcontrol ×1

tpanel ×1