如何做到只打开一个窗体实例？

Question

点击按钮打开一个窗体，再次点击的话，如果先前打开的窗体还没有关闭，则直接显示，不需要再创建，但是如果已经关闭，则要重新创建（为了释放资源，应该在窗体关闭的时候把它释放掉）。如何实现以上功能？

Answer 1

if (Application.FindComponent('form2') as TForm)=nil then
begin
form2 := Tform2.create(nil); 
form2.parent :=panel1;
end
form2.show;

Answer 2

if (Application.FindComponent('form2') as TForm)=nil then
begin
form2 := Tform2.create(nil); 
form2.parent :=panel1;
end
form2.show;