请问有谁知道用delphi6做软件启动闪现封面！！！

Question

uses
  Forms,
  about in 'about.pas' {CopyRight};//创建一个窗体，为TCopyRight,文件名为about，在此窗体中有一Timer对象负责延时。{$R *.TLB}
var
  aboutinfo:TCopyRight;
{$R *.RES}begin
  Application.Initialize;  aboutinfo := TCopyRight.Create(Application);//创建
  aboutinfo.Show;//显示
  aboutinfo.UpDate;//强行更新
  While aboutinfo.Timer.Enabled do Application.ProcessMessages;//允许系统响应其他消息。
  Application.CreateForm(TServerForm, ServerForm);
  aboutinfo.Hide;//隐藏
  aboutinfo.Free;//销毁
  Application.Run;
end.

Answer 1

先做一个窗体about。把要在闪显中显示的图片放到about中。
    然后在项目文件上写
begin
   application.initialize
   with Tabout.create(application) do
      begin
         show;
         update;
         sleep(3000);//wait time
      end；
   Application.CreateForm(Tmain, main);
   application.run;
   end.