請問各位大俠﹐能否在一個窗口中Free另一個窗口,我用的是Delphi6﹐我一Free則系統報錯。敬請幫助﹐多謝﹗

解决方案 »

  1.   

    应该可以的,用Close不行吗?
      

  2.   

    如果是Normal form, 直接Close就可以了,如果是MDIChild form, 可用Action := CAFree;
      

  3.   

    我調用了FindWindow()函數判斷窗口是否創建﹐如果窗口不Free則FindWindow()函數返回大于0﹐所以像Wally_wu(Wally) 兄所說的close不能通過。
      

  4.   

    你在你的窗体的ondestroy事件中加上一句:
    form2:=nil;
      

  5.   

    你在你的窗体的ondestroy事件中加上一句:
    form2:=nil;
      

  6.   

    不行﹐這樣打開一次后窗口不能第二次打開了﹐跟只Close而沒有Free一樣的現象
      

  7.   

    跟直接Close而沒有Free一樣的錯誤﹐請大家繼續討論﹐謝謝
      

  8.   

    如果是Normal form, 直接Close就可以了,如果是MDIChild form, 可用Action := CAFree;
      

  9.   

    在你要free的form的onclose事件下面写上action:=cafree;form2:=nil;然后在form1下就可以用close 释放form2了~~~~~~~~~~~~~~~~~~~~~~~~  
     世界因为你我而年轻!
    ☆★○●◎◇◆□■△▲※
      

  10.   

    你在你的窗体的ondestroy事件中加上一句:
    form2:=nil;
      

  11.   

    謝謝大家的回答﹐只可惜現在還沒有解決﹐請大家再想一想。
    TO  long102(龙102) 兄﹕剛看了版主伴水的灌水﹕信譽分不代表信譽﹔專家分不代表專家。所以稱星多不代表水平高。哈哈﹐我也是個菜鳥﹗