关于FORM销毁问题

我想实现一个FORM1中，我点击一下按钮， 出现另一个FORM2
并且FORM1也同时销毁掉。我尝试了下，下FORM1的按钮消息中，这样写
FORM2.SHOW;
CLOSE;可惜了，把FORM2生成了，FORM1马上销毁，但又因为FORM1的销毁，FORM2也随之销毁了。请教下！谢谢

解决方案 »

  1.   

    或者
    form2.showmodal;
    close;
      

  2.   

    form2.showmodal;跟 form2.show;区别再哪里
      

  3.   

    form2显示为模态,关闭后才会执行close
      

  4.   

    form2显示为modal,关闭后才会执行close
      

  5.   

    form2显示为modal,关闭后才会执行close
      

  6.   

    我是我想要的是：
    点击FORM1的按钮FORM1关闭， FORM2显示
    FORM2.SHOWMODAL;
    CLOSE
    这样可以实现么
      

  7.   


    你要先确定那个作为主窗体,主窗体不应关闭!!!点按扭后执行FORM2.SHOWMODAL,FORM2显示,但FORM1并没有关闭,当FORM2关闭后,执行CLOSE ,则FORM1就关闭了,若FORM1是主窗体,整个程序也就关闭了!!!
      

  8.   

    9楼说的比较明白了，很感谢，不过如何才能做到，让FORM2是主窗口，
    让FORM1不是主窗口， 
    但程序启动时，先显示FORM1,然后点击FORM1上的按钮，弹出FORM2窗体，并且FORM1销毁。
      

  9.   

    在网上搜一搜“Delphi 登陆窗体制作”相信会有一堆出来，自己看吧，这就是你想要的全部，我是懒得写代码了
      

  10.   

    在网上搜一搜“Delphi 登陆窗体制作”相信会有一堆出来，自己看吧，这就是你想要的全部，我是懒得写代码了
      

  11.   

    在project菜单中options选项打开后,forms标签页下选择mainform
      

  12.   

    创建工程Project1,两个窗体 TForm1,TForm2
    Project1.dpr中这样写program Project1;uses
      Forms,
      Unit1 in 'Unit1.pas' {Form1},
      Unit2 in 'Unit2.pas' {Form2};{$R *.res}begin
      Application.Initialize;
      Form1:=TForm1.Create(Application);
      Form1.ShowModal;  Application.Run;
    end.窗体 1的按钮事件如下procedure TForm1.Button1Click(Sender: TObject);
    begin
      Application.CreateForm(TForm2, Form2);
      Close;
    end;