怎么不能?要是不能你在FORM1。SHOW看看还有没有?

解决方案 »

  1.   

    用close
    在onclose中加入action:=cafree;
      

  2.   

    befree(似有似无)说的对!
    在form的onclose中加入action:=cafree;即可!
    你可以试试
      

  3.   

    一般来说用onclose事件的:action := cafree就可以了。
    也可以用form1.free方法或者destroy方法。
      

  4.   

    再加上form1 := nil; ,指针嘛,就这样。
    还有个FreeAndNil函数,很好用,查查帮助,强烈推荐!
      

  5.   

    兵书上云:释放窗体须用以下代码:
             Action:=caFree; 
             if 窗体被释放 then
             给我加分!自己一试便知!
      

  6.   

    有两种:
     Form1:=TForm1.Create(Application);
     Try
       Form1.ShowModal; 
     Finally
       Form1.Free;
       Form1:=NIL;
     end;
    //////////////////////////////////////////////////////
     if Not Assigned(Form1) then
       Form1:=TForm1.Create(Application);
     Form1.Show;
    procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
    begin
      Action:=caFree;
    end;procedure TForm1.FormDestroy(Sender: TObject);
    begin
      Form1:=NIL
    end;
      

  7.   

    action:=cafree;
    然后把modeless变量设为nil;
    就是modeless:=nil;