请问我想在form1里点击按钮自动生成一个form2
请问代码怎么写?
需要什么定义吗?

解决方案 »

  1.   

    在Button中写
    var
      MyForm: TForm;
    begin
      MyForm := TForm.Create(Self);
      MyForm.Caption := 'MyForm';
      MyForm.Top := 0;
      MyForm.Left := 0;
      MyForm.Width := 100;
      MyForm.Height := 200;
      MyForm.ShowModal;
      MyForm.Free; 
    end;
      

  2.   

    为什么form是建立了但在view form里 却找不到?
      

  3.   

    var
      MyForm: TForm;
    begin
      MyForm := TForm.Create(Self);
      MyForm.Caption := 'MyForm';
      MyForm.Show;
    end;
      

  4.   

    你可以像创建form1一样创建它,但再option-->form中,把它从autocreat中除去,点击form1中按钮时,可以动态显示他,就是上面各位的代码,
    其实也就是动态创建了
    UP!