Question

delphi2010 新建form释放问题。

我通过N2.click使form2.show，form1和form2均uses对方，点击button1后form2可以打开并运行，但是运行完关闭后，当再点击button1时，form2再次打开，上面内容显示的是关闭前的内容，如何关闭时候form2释放？我设置formstyle设置为fsNormal。

Answer 1

form2关闭时释放一下
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
self.Free;
end;

显示它时创建一下
procedure TForm1.Button1Click(Sender: TObject);
begin
Application.CreateForm(TForm2, Form2);
form2.Show;
end;