按钮事件里加;form2.show或者。。根据你的需要了前提是form1要use form2的单元文件
var Form1: TForm1;implementationuses Unit2;{$R *.DFM}procedure TForm1.Button1Click(Sender: TObject);beginForm2.show();end;end.
