button 怎么实现在pagecontrol逐个创建复选框

button 如何实现在pagecontrol逐个创建复选框
大家好请问:button 如何实现在pagecontrol内逐个创建 复选框？

[解决办法]

Delphi(Pascal) code

procedure TForm1.Button1Click(Sender: TObject);var tem:TcheckBox;begin   tem := TCheckBox.Create(self);   tem.Caption := '测试';   tem.Parent := TabSheet1;end;