form显示问题

有2个form,form1和form2，form1是主窗体，我想让程序运行时，2个form同时显示，且form2在form1上面，怎么实现

解决方案 »

  1.   

    from1.show里面写
    form2.showmodal
    不可以吗？
      

  2.   

    把form2的visible设为true
    form2.FormStyle:=fsStayOnTop;
      

  3.   

    to lovelymelon(小人物) 你的方法还是可以对from1进行操作，我的意思是，这时只能对form2进行操作，即form2相当于登陆界面
      

  4.   

    to comerliang(天地良心)你的方法只会显示form2，不会显示form1
      

  5.   

    如果Form2相当于登录界面,那么可以使用 Comerliang(天地良心)的方法.如果不想让主窗口也显示出来,就在主窗口的OnCreate里Form2.ShowModal如果要让主窗口显示出来,就在主窗口的OnActivate事件里写如下代码.OnActivate:= Nil;
    Refresh;
    Form2.ShowModal
      

  6.   

    同意Maple119(枫叶) 的解决方案。
      

  7.   

    你是要做登录界面啊
    那么 comerliang(天地良心) ( ) 方法不错啊
      

  8.   

    先不要在主程序运行的时候激活form2，然后
    procedure TForm1.FormActivate(Sender: TObject);
    begin
      form2:=Tform2.Create(self);
      form2.ShowModal;
      form2.Free;
    end;
    有问题请发信息到我的E-mail:[email protected]
    来信请把问题的网址粘贴上。
      

  9.   

    在Form1的Show事件中：Form2.Show;
    Self.Enabled := False;在Form2的Close事件中：Form1.Enabled := True;