var button1:tbutton;
 begin
  button1:=tbutton.create;
 button1.visible:=true;
 end;

解决方案 »

  1.   

    button1:=tbutton.create;button1.Parent := self;
    button1.left := 100;
    button1.top := 200; button1.visible:=true;
     end;
      

  2.   

    var but:tbutton;
    begin
      but:=tbutton.Create(self);
      but.Parent :=form1;
      but.Left :=0;
      but.Width:=100;
      but.Top:=0;
      but.Height :=100;
      but.Caption :='我是动态的';
    end;
      

  3.   

    button1.Parent := 一个容器
      

  4.   

    指定所依附的对象.
    button1.parent:=form1
      

  5.   

    button1.Parent := form1;
    把他的PARENT赋值,也可以是PANLE等容器