怎么让程序在运行后马上显示两个窗体

在一个project.dpr下有两个窗体文件，form1，form2，其中form1为默认主窗体，现在我想在运行后同时显示这两个窗体，应该怎么做？不希望通过在form1设置按钮来改变...

解决方案 »

  1.   

    在主窗体form1onShow时，让form2显示出来procedure TForm1.FormShow(Sender: TObject);
    begin
      form2.Show;
    end;
      

  2.   

    但是我没有自己去定义form1的onshow
      

  3.   

    但是我没有自己去定义form1的onshow
      

  4.   

    1，在主窗体的onactivate里
    showmodal
    2，Oncreate 发消息创建一个窗体
      

  5.   

    非常感谢2位，1L说的我已经清楚了，在onshow事件里创建出FormShow，然后如1L所写...看来得到了方向就应该试着去动手