请教一窗体创建释放问题?

Question

Form1为主窗体,单击其中的一按钮Btn1动态创建并模式显示Application.CreateForm(TForm2, FrmForm2);Form2.ShowModal;在Form2上又有一按钮Btn2,单击此按钮动态创建并模式显示Application.CreateForm(TForm3, FrmForm3);Form3.ShowModal;关闭Form3后,在Form2用Assigned(Form3)仍为True,为什么?

Answer 1

关键是你没有释放对象
//btn1的事件可以这样写：
with TForm2.Create(Application) do
try
  ShowModal;
finally
  Free;
end;//btn2的事件可以这样写
with TFrom3.Create(Application) do
try
  ShowModal;
finally
  Free;
end;