我新建一工程,有两个form,就是两个unit,我想运行后先出现from1后,按一个botton出现form2,并关掉form1,如何编码,谢谢

解决方案 »

  1.   

    就二个form好像关不了的噢
    1在form1的unit1里implementation后加入
    uses unit2;
    2在form2的unit2里implementation后加入
    uses unit1;
    3在button事件里加入
      Application.CreateForm(TForm2, Form2);
      form2.ShowModal;
      

  2.   

    uses unit2;在button中写form2.show;
    form1.close;
      

  3.   

    不对阿,我的编码如下:
    if edit1.Text='txbpbj' then
       form1.Close;
       Application.CreateForm(TForm2, Form2);
       form2.ShowModal;
    请大家再看看
      

  4.   

    为什么我输入txbpbj后form1是关了,可是form2还是打不开