请高手解决窗体调用问题.

                            
有form1,form2两个窗体。   
  在form1中按钮a调用form2:  
      if   form2   =   nil   then  
          begin  
              form2:=Tform2.create(self);  
              form2.show  
          end;  
  在form2中有个按钮b,执行以下代码:  
        freeandnil(form2)  
  当执行程序时,单击按钮a,产生、显示form2.再单击按钮b,释放form2,反复执行这操作后,出错。  
  但在form2中的close事件中,加入freeandnil(form2)代码,使用form2右上角的关闭按钮,来释放form2,却一点问题都没有。请问如何解决?  
 

查看回复

相关问题