var
  A: TButton;
begin
 A := TButton. Create(self);
 A.Parent:=Self;
end;

解决方案 »

  1.   

    请问为什么要把A.Parent:=Self呢,还有TButton.Create(Self)和TButton.Create(Owner)有何不同,谢谢。
      

  2.   

    Parnet赋值之后才会显示出来。
      

  3.   

    var
      控件名:控件类;
    //声明它
    begin
    控件名.Create(self);
    //建立它
    控件名.Visible:=true;
    //可视它
    end;
      

  4.   

    button:=tbutton.create(self);
    button.onclick:=buttonclick;
      

  5.   

    XXX.create(Owner):owner是负责管理对象的创建与释放的
    而parent是指的该对象所属的容器对象,正如楼上所说,指的在那里显示