formclose事件中
action:=caFree;//释放资源

解决方案 »

  1.   

    是啊,我是这样做的啊,可是不行啊,主创体是灰色的,我只好把程序reset了
    而且,这样的话,好像资源也没有完全释放。
      

  2.   

    你的前一个窗体是不是用ShowModal的方式显示出来的?如果是,按一下ALT+TAB,应该就可以弹出来。
    最好把创建和释放两个窗体的代码贴出来。
      

  3.   

    比如第一个normal窗口的名字叫normal1,第二个窗口的名字叫normal2. 你就用procedure Tnormal2.FormClose(Sender: TObject; var Action: TCloseAction);
    begin
      normal1.free;
    end;
    不过要在normal2单元文件的USES中加上normal1的单元文件名。
      

  4.   

    我回来了,我用大家的方法试过了,不过好像都不行
    我的第一个窗体是用ShowModal显示的,关闭第一个时可以返回,但是打开第二个后,再关闭就不行了,按了Alt+Tab也没有用,仍然无法激活主窗体。我试了一下,当使用Show显示时,无论怎样都可以正常关闭,返回主窗体,而且内存完全回收。但是一旦第一个窗体用ShowModal显示的话,就不行了。
    那么,是因为ShowModal的原因吗?怎么用才是正确的?