TPanelのように動作するTCustomControlを作成する方法？

Question

TPanelのような振る舞いをするTCustomControlを作成する方法例えば、MyCustomComponent、私は同じラベル、画像などのコンポーネントを削除することができます。

Answer 1

TCUSTOMPANELのこのコードは、

です。

constructor TCustomPanel.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  ControlStyle := [csAcceptsControls {, ... } ];
//...
end;

.

csAcceptsControlsプロパティにControlStyleを持つことができる多くのVCLコントロールがあります。

あなたがあなた自身のコントロールでこれをしたいのであれば、そのようなVCLコントロールから降りない場合は、次のようにしてください。

1. Create Constructor
をオーバーライドする
2. csAcceptsControlsプロパティ
にControlStyleを追加

このサンプルコードのように：

//MMWIN:MEMBERSCOPY
unit _MM_Copy_Buffer_;

interface

type
  TMyCustomControl = class(TSomeControl)
  public
    constructor Create(AOwner: TComponent); override;
  end;


implementation

{ TMyCustomControl }

constructor TMyCustomControl.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  ControlStyle := ControlStyle + [csAcceptsControls {, ...} ];
//...
end;


end.

.

- jeroen