在第一个窗体中动态创建第二个窗体:
在窗口一上按钮一,点击按钮一动态创建第二个窗体,主要是在单元一中引用单元二文件。
Uses Unit2; //引用单元文件....
procedure TForm1.Button1Click(Sender: TObject);begin//Form2:=TForm2.Create(nil);//Form2:=TForm2.Create(Self);//Form2:=TForm2.Create(Application); //创建窗体 Application.CreateForm(TForm2,Form2); Form2.Show;end;