如何动态把一个控件放入一个容器问题！（论坛维护所无发搜索）

Question

如何动态创建控件checkBox并把它放入一个容器里，
放在from上的Panel1上的Panel2上的GroupBox里！
论坛维护没法搜索！请多多指教

Answer 1

1.创建时设置其parent 为  该GroupBox
var
  Check: TCheckBox;  Check :=  TCheckBox.Create(self);
  Check.Parent :=  GroupBox1;或则
2。创建时将Check 插入GroupBox中
  Check :=  TCheckBox.Create(self);
  GroupBox1.InsertControl(Check);

Answer 2

checkbox:=TCheckBox.Create(self);
checkbox.Left:=2;
checkbox.Top:=2;
checkbox.parent:=groupbox;
.......

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
var
  CKB:TCheckBox;
begin
  CKB:= TCheckBox.Create(Self);
  CKB.Name := 'dddd';
  caption := 'New CheckBox';
  Ckb.Left := 50;
  ckb.Top := 50;
  CKB.Parent := GroupBox1;
  CKB.Show;
end;procedure TForm1.Button2Click(Sender: TObject);
begin
{测试}
  (FindComponent('dddd') as TCheckBox).Checked := not (FindComponent('dddd') as TCheckBox).Checked ;
end;

Answer 4

向 meiqingsong(阿飛)  同志学习~!