我做了个MAINFORM,想在使用前一定要填一些资料,在另外的REG_FORM里边,先要填完
才能进入MAINFORM,两个都是fsnormal。要改REG_FORM哪个属性~

解决方案 »

  1.   

    在OnCreate或OnShow时把属性设完,
      

  2.   

    确认在菜单Project\Options...中,你的MAINFORM是main form
    将MAINFORM的visible属性设为false,REG_FORM的visible属性设为true
    在项目文件(*.dpr)中写:
    begin
      Application.Initialize;
      Application.ShowMainForm :=false; //这一行是自己加的
      Application.CreateForm(TMAINFORM, MAINFORM);
      Application.CreateForm(TREG_FORM, REG_FORM);
      Application.Run;
    end.这样,程序运行时,MAINFORM不可见,只能看到REG_FORM
    填完后,如果不符合要求,调用Application.terminate;结束程序退出
    如果符合要求:
    MAINFORM.show; //调出MAINFORM
    self.close;  //关闭自己(REG_FORM)
      

  3.   

    你可以设置登陆窗体为主窗体,登陆后隐藏,当程序关闭时,调用登陆窗体.close;
      

  4.   

    来个简单的
    mainform的onpaint事件
    procedure TForm1.FormPaint(Sender: TObject);
    begin
        @onpaint:=nil;
        REG_FORM。showmodal;
    end;
    其余的自己控制
      

  5.   

    一般的LOGO窗口可以如下方式实现:
    begin
      Application.Initialize;
      Application.CreateForm(TREG_FORM, REG_FORM);
      REG_FORM.show;
      While Reg_Form.visible do
         Application.ProcessMessages;  
        {Reg_Form填完后关闭,将visible属性设置为false;}
      Reg_form.free;
      Application.CreateForm(TMAINFORM, MAINFORM);
      Application.Run;
    end.   试试看,具体怎么编写你可能有你自己的考虑。