动态创建form

Question

function Form2 : TForm2;
過程聲明。
result := FForm2;應該用不著吧
另外Form2關閉時有無置nil的過程?

Answer 1

在你的TForm2里可能有问题，一起贴出来看看

Answer 2

form2是什么模式的，MDI？
form2有没有自动创建？

Answer 3

if not assigned(form2) then
  form2:=Tform2.create();
form2.show;

Answer 4

form2:=tform.create(Application);
   try
     form2.ShowModal;
   finally
     form2.Free;
     form2:=nil;
   end;

Answer 5

form2:=tform.create(Application);
   try
     form2.ShowModal;
   finally
     form2.Free;
     form2:=nil;
   end;

Answer 6

释放窗体一定要把指针即 Form = nil 不然变成了野指针了,用 if not Assigned(Form) = nil 判断不起作用的