关于Form的菜题，请快点回答，谢了

Question

if 條件通過 then
Begin
Form2.ShowModal;
end
else
Form2.Free;

Answer 1

我现在发现了另外一种方法。jackie168，你的方法不行的（或许是我弄错）
请大家继续

Answer 2

在form2的OnClose事件中加入Action:=caFree;
然后在需要显示form2的地方这样写
with TForm2.Create(Application) do
  Show;

Answer 3

在TFrom2的OnClose事件中加入Action;=caFree;
在需要显示form2的地方写成
with TFrom2.Create(Application) do
  Show;

Answer 4

//创建
首先在Form2中
var
  form2: Tform2;
下面加上
  frm2: Tform2;创建时用
application.CreateForm(Tform2,frm2);
AFTNALN.show;//关闭时用
frm2.free;action:=caFree是Close时自动将该窗体释放

Answer 5

你可以在打开窗体时，
    if not Assigned(form) then
    begin
      Application.CreateForm(Tform, form);
    end 
    else
    begin
     Form.Free;s 
    end;