如何在动态窗体中添加各种控件！最好举个小例子！（轻易得20分）

Question

var
form2:TFORM;
button2:tbutton;
begin
  form2:=Tform.create(self);
  form2.Create(button2);
  button2:=tbutton.create(self);
  button2.Caption:='heoo';
  button2.Left:=200;
  button2.Top:=200;
  button2.Height:=200;
  button2.Width:=200;
  button2.show;
  form2.Show;
end;
这中间出现的问题在那？能给我举个例子么？谢谢！

Answer 1

var
  form2:TFORM;
  button2:tbutton;
begin
  form2:=Tform.create(self);
//  form2.Create(button2);//????????????????????????
  button2:=tbutton.create(self);
  button2.Caption:='heoo';
  button2.Left:=200;
  button2.Top:=200;
  button2.Height:=200;
  button2.Width:=200;
  button2.Parent:=form2; //<--button没有容器放置
  button2.show;
  form2.Show;
end;

Answer 2

button2.parent := form2;

Answer 3

fhuibo(sailot),sorry我只能给先答的，下次吧，谢谢各位