动态创建窗体Var NewForm:TForm1;begin NewForm:=TForm1.Create(Nil); NewForm.Show;end;
先在控件中拖拽按钮控件到from1，再在按钮OnClick事件中调用form2的formshow方法。
