我现在有四个窗体,一个封面(frmconnect),一个登陆窗体(frmlogo),一个主窗体MDIFORM(frmmain),一个MDIChild窗体(frmSysFunction),我想实现 先封面出现  在出现登陆窗体,在出现主窗体,同时mdichild也出现在主窗体中
  在项目中的代码是:
   begin
  Application.Initialize;
  frmconnect:=Tfrmconnect.Create(application);
  frmconnect.Show;
  frmconnect.Update;
  sleep(1000);
  Application.CreateForm(Tfrmlogo, frmlogo);
  Application.CreateForm(Tfrmmain, frmmain);
  frmlogo.Show;
  frmlogo.Update;
  frmconnect.Hide;
  frmconnect.Free;
  Application.Run;
end.在登陆窗体中的button1中写的代码是procedure Tfrmlogo.Button1Click(Sender: TObject);
begin
frmmain.show;
frmmain.update;
frmlogo.Hide;
frmlogo.Free;
application.CreateForm(TfrmSysFunction,FrmSysFunction);
frmSysFunction.Show;
frmSysFunction.Update;
end;但是当一点击 button时就会出现这么一个提示:
“con't creat form . No MDI forms are currently active.”请问各位大虾什么原因呀,错误在哪里呀  或者有什么好的方法,谢谢啦!

解决方案 »

  1.   

    asd                                                                                                                                                                                                  asd