Создать все дочерние элементы через Create

[Kronos913]

Допустим есть вот такой вот тип объекта

type
  TPanel1 = class(TPanel)
  private
    { Private declarations }
  public
    a, b, c: TButton;
    { Public declarations }
  end;

Вопрос: как сделать так, чтобы при использовании функции TPanel1.Create создавалась не только панель, но и сразу автоматически создавались и все кнопки?

В идеале, конечно, чтобы они еще и сразу все настраивались (отправлялись на нужные координаты)
Но для начала хотя бы создать их всех сразу

[northener]

Сообщение от Kronos913

Вопрос: как сделать так, чтобы при использовании функции TPanel1.Create создавалась не только панель, но и сразу автоматически создавались и все кнопки?

Написать код для этого потомка класса TPanel. В чём проблемы?

[DIONISKA]

У любого класса есть конструктор и деструктор:

  TPanel1 = class(Vcl.ExtCtrls.TPanel)
  private
    {...}
  public
    a, b, c: TButton;
    constructor Create(AOwner: TComponent); override;
    destructor destroy; override;
  end;

Соответственно описываются:

constructor TPanel1.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  a:=TButton.Create(self);
  b:=TButton.Create(self);
  c:=TButton.Create(self);
  a.Parent:=self;
  b.Parent:=self;
  c.Parent:=self;
  a.Left:=0;
  b.Left:=a.Left+a.Width;
  c.Left:=b.Left+b.Width;
  {ваш код создания элементов, позиционирования и тп}
end;

destructor TPanel1.destroy;
begin
{ваш код уничтожения эл-в, освобождения памяти и тп}
  a.Free;
  b.Free;
  c.Free;
  inherited Destroy();
end;

PS:

Сообщение от Kronos913

Вопрос: как сделать так, чтобы

Я посоветовал бы почитать Д.Осипова, у него довольно подробно про ООП и не только

[evg_m]

кроме TPanel существует еще и TFrame который можно НАПОЛНЯТЬ другими Control (кнопки и т.п. ) в визуальном режиме (disign), а потом добавлять на форму как единое целое(вместе с кнопками).
https://programmersforum.ru/showpost...18&postcount=3
в т.ч. и динамически (через Create)

[FaTaL]

Сообщение от DIONISKA

Я посоветовал бы почитать Д.Осипова, у него довольно подробно про ООП и не только

Что за книжка?

[DIONISKA]

Сообщение от FaTaL

Что за книжка?

Конкретно я имел ввиду Д.Осипов "Delphi. Профессиональное программирование", хоть довольно старая, но основы там изложены хорошо.