急，在panel中自动创建checkbox,提示已经存在，可就是看不见阿。急

Question

procedure TForm2.Button1Click(Sender: TObject);
var check:Tcheckbox;
begin
.....
check:=Tcheckbox.create(self.Panel1);
check.Name:='checkbox'+inttostr(i);
check.Visible:=true;
check.Caption:=adoquery1.Fields[i].fieldname;
check.Left:=15;
check.Width:=75;
check.Height:=25;
check.Checked:=false;end;

Answer 1

....
check:=Tcheckbox.create(Owner);
check.Parent:=self.Panel1;
....

Answer 2

check:=Tcheckbox.create(self.Panel1);
  check.Parent := Self.Panel1;     //加上这一句
  check.Name:='checkbox'+inttostr(i);
  check.Visible:=true;
  ......

Answer 3

好了，谢谢哦。已经给分了。我是出学者，还有个问题。
如何用ADOconnection连接在edit中指定的SQL服务器和数据库阿。
如何设置ADOconnection的connectionstring阿？谢谢各位前辈了