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

[cclzlj]

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

[trainbox]

checkbox.parent:=groupbox

[梅青松]

1.创建时设置其parent 为 该GroupBox
var
Check: TCheckBox;

Check := TCheckBox.Create(self);
Check.Parent := GroupBox1;

或则
2。创建时将Check 插入GroupBox中
Check := TCheckBox.Create(self);
GroupBox1.InsertControl(Check);

[trainbox]

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

[10975037]

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;

[10975037]

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

[cclzlj]

真的很感谢啊！大家这么及时的回复！提前祝福大家新年快乐！万事如意！来年高薪！