Panel zur Runtime erstellen+ label im panel erstellen?

[sniper_w]

Wieso das Leben schwer machen ?

Delphi-Quellcode:

  public
    { Public declarations }
    mypanel :TPanel;
    myLabel : TLabel;
  end;


//.......

procedure TForm1.Button3Click(Sender: TObject);
begin
 mypanel := TPanel.Create(self);
 with mypanel do
 begin
  Visible := True;
  Color := clBlack;
  Width := 100;
  Height := 100;
  Top := 100;
  Left:= 200;
  Parent := Self; // <<-- TForm, Form1 zb.
 end;
 myLabel := TLabel.Create(Self);
 with myLabel do
 begin
  Visible := True;
  Caption := 'my label';
  AutoSize := True;
  Top := 10;
  Left := 20;
  Font.Color := clYellow;
  Parent := mypanel; // <<----BINGO
 end;
end;