我想在主操作窗口(MENU)出来之前先有个小的窗口(WFLASH)出来,感觉就是缓冲过度的那种
我仿着一个现成的程序写了下面的,但是不对,求高人解救
program stumanage;uses
  Forms,
  main in 'main.pas' {MENU},
  wflash in 'wflash.pas' {WFLASH};{$R *.res}begin
  WFLASH:=TWFLASH.Create(application);//
  WFLASH.Show;                        //
  WFLASH.Update;                      //以上3行编译有错
  Application.Initialize;
  Application.Title := '学生信息管理系统';
  Application.CreateForm(TMENU, MENU);
  Application.CreateForm(TWFLASH, WFLASH);
  Application.Run;
end.

解决方案 »

  1.   

    为什么要这样做呢?用splash吧...
      

  2.   

    你是要启动画面?
      frmSplash := TfrmSplash.Create(Application);
      frmSplash.Show;
      Application.ProcessMessages;
      frmSplash.Update;
    在程序执行之前写
      

  3.   

    是的是的, 求教一下:frmSplash 是什么东西啊?
      

  4.   

    WFLASH这应该是一个欢迎窗体,存不存在呢?好好检查下!
      

  5.   

    uses 
      Forms, 
      main in 'main.pas' {MENU}, 
      wflash in 'wflash.pas' {WFLASH}; {$R *.res} begin 
      WFLASH:=TWFLASH.Create(nil);// 
      WFLASH.Show;                        // 
      WFLASH.Update;       
      Application.ProcessMessage;
      Application.Initialize; 
      Application.Title := '学生信息管理系统'; 
      Application.CreateForm(TMENU, MENU); 
      WFLASH.Free;
       // Application.CreateForm(TWFLASH, WFLASH);   上面不是有了吗?还要建?
      Application.Run; 
    end.
      

  6.   

    uses 
      Forms, 
      main in 'main.pas' {MENU}, 
      wflash in 'wflash.pas' {WFLASH}; {$R *.res} 

    var
      WFLASH: WFLASH;

    begin 
      WFLASH:=TWFLASH.Create(application);// 
      WFLASH.Show;                        // 
      WFLASH.Update;                      //以上3行编译有错 
      Application.Initialize; 
      Application.Title := '学生信息管理系统'; 
      Application.CreateForm(TMENU, MENU); 
      Application.CreateForm(TWFLASH, WFLASH); 
      Application.Run; 

      WFLASH.Free;

    end.
      

  7.   

    错了,应该是
    var 
      WFLASH: TWFLASH;