将新窗体.OPEN
旧窗体.CLOSE

解决方案 »

  1.   

    procedure onbutton1click(sender:object);
    begin
       Form2.showmodal;
       close;//form1.close;
    end;
      

  2.   

    procedure Tform1onbutton1click(sender:object);
    begin
       Form2.showmodal;
       close;//form1.close;
    end;
      

  3.   

    哦,想到一种可能就是你打开新窗体的按钮的ModalResult属性不是mrNone
      

  4.   

    procedure Tform1onbutton1click(sender:object);
    begin
       Form2.show;
       close;  //但你的form1一定不要是mainform,不然程序就退出了
    end;
      

  5.   

    你的第二个窗体如果是在第一个窗体中创建的你只能HIDE第一个窗体因为如果CLOSE则第二个窗体也关了。
    如果是在应用程序初始化时创建的就CLOSE 就可以了。