关于动态创建MDI子窗体的问题，这个代码有没有问题？？

Question

动态创建的代码：MDI主窗口的菜单中：if not Assigned(MdiChildForm)then //如果没有则创建
     try
        begin
        MdiChildForm:=TMdiChildForm.create(self);//动态创建对象
         MdiChildForm.Show;
        end;
     except
        MdiChildForm.Free;
        MdiChildForm:=nil;
     end
else
      MdiChildForm.show;   //不再创建对象，让其获得焦点显示即可
另外，关于MDI子窗体 如何释放？？

Answer 1

盡量用在   MDIChildren[i].Name   // 打子窗體的類別來判斷是否存在。   

Answer 2

释放窗体
procedure TMdiChildForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caFee;
  MdiChildForm := nil;
end;