怎样实现一个窗体出现几秒就消失了，接着出现主窗体

Question

SplashForm(闪动窗体,毫秒数);
1000毫秒=1秒if Above=True then 给分;

Answer 1

给你一段我在C++Builder下的代码
Application->Initialize();
LogoForm = new TLogoForm(Application);
LogoForm->Show();
LogoForm->Update();
Application->CreateForm(__classid(TForm1), &Form1);
LogoForm->Free();
Application->Run();
LogoForm--你要显示的窗体。

Answer 2

在工程文件(project1.dpr)里定时显示“闪屏”

Answer 3

先创建一个窗体Form2
OnCreate事件里,动态创建 
TForm2 Form2;
Form2.Create(self);
Form2.Show;
GetSystemTime(systime);//systime是一个保存系统时间的结构,我忘了,你可以
                                      查的
 剩下的你可自己设计了(先去查GetsSystemTime的用法,我可能写错了)
很简单的,用一个循环

Answer 4

Uses AboutBox  
在工程文件中选File->New Form新建一个窗口，设计好窗口的外观。给窗口起名为AboutBox,  选Project->Options，将新建的窗口从自动建立中去掉。 选View->Project Source，打开工程文件的源文件，在下面加入红色的句子。  
Var  
lTime :TDateTime;  
Begin  
Application.Initialize();  
AboutBox:=TAboutBox.Create(AboutBox);  
AboutBox.Show;  
AboutBox.Update;  
lTime:=GetTickCount;  
Application.CreateForm(TMainForm,MainForm);  
while((GetTickCount-lTime) / 1000 <3) do; 
AboutBox.Hide; 
AboutBox.Free; 
Application.Run; 
end; 

Answer 5

在FORM上加一個TIME控件,設置INTEVAL屬性為2000,
procedure Tfrmsplash.Timer1Timer(Sender: TObject);
begin
  self.free;
  fmlogin.show;
end;

Answer 6

//显示启动画面
      frmFlash:=TfrmFlash.Create(nil);
      try
        frmFlash.Show;
        frmFlash.Update;
        Application.ProcessMessages;
        //创建主窗体但不显示,这段时间正显示启动画面
        Application.CreateForm(TfrmMain, frmMain);
      finally
        frmFlash.Free;
      end;      //创建登录窗体并显示
      frmLogon:=TfrmLogon.Create(nil);
      try
        Logoned:=frmLogon.ShowModal;
      finally
        frmLogon.Free;
      end;
      if Logoned=mrOK then Application.Run
        else Application.Terminate;
以前的帖子

Answer 7

如在程序运行前先显示form2在程序初始化后面加以下语句
application.initialize;
form2:=tform2.create(application);
form2.show;
form2.update;
*********
*********
form2.hide;
form2.free;
application.run;

Answer 8

在mainform的onshow事件里加上:
Application.createform(twelcomeform,welcomeform);
welcomeform.showmodal;在欢迎的窗口里加上time控件,
在事件里加上:
 Welcomeform.Modalresult:=mrOK;注意;这个欢迎窗口要设定为手动生成.这个方法用起来不错,反正我就经常用.