两个菜鸟问题，快抢分啊！(100分)

1.怎样设置程序启动画面并设置定时？
2.有没有简单调用函数的方法进行延时，而不用timer控件？

1.file->new->好像有一个splash form 延时用timer
2.sleep(毫秒数)

启动画面的显示时间不是有延时决定的,而是根据你初始化的时间决定的,
在初始化之前SHow一个启动画面,然后作初始化工作,最后把画面Hide.
Sleep函数会使程序死一段时间.
下面给你贴一段启动画面的代码在工程文件中)
Application.Initialize;
SplashForm:=TSplashForm.Create(nil);
SplashForm.SHow;
SplashForm.Update;(*启动画面,你可以在下面作任何想要作的初始化工作*)
Application.CreateForm(TFrm_Main, Frm_Main);
Application.CreateForm(TFrm_SysInfo, Frm_SysInfo);
Application.CreateForm(TFrm_DbConfig, Frm_DbConfig);
Application.CreateForm(TFrm_NewWorks, Frm_NewWorks);
Application.CreateForm(TFrm_InstallFile, Frm_InstallFile);
Application.CreateForm(TFrm_AddFile, Frm_AddFile);
Application.CreateForm(TFrm_DragFile, Frm_DragFile);
Application.CreateForm(TFrm_Registry, Frm_Registry);
Application.CreateForm(TFrm_EditReg, Frm_EditReg);
Application.CreateForm(TFrm_InstallInfo, Frm_InstallInfo);
Application.CreateForm(TFrm_AppInfo, Frm_AppInfo);
Application.CreateForm(TFrm_CFGSQLLINK, Frm_CFGSQLLINK);
Application.CreateForm(TFrm_FileBuilder, Frm_FileBuilder);
Application.CreateForm(TFrm_SerialNo, Frm_SerialNo);
SplashForm.Hide;
Application.Run;

同意XUEMINLU的看法。

看看.../delphi?/demos/db/mastapp的例子,你的问题基本可以解决了.

接上,可以直接在mastapp.dpr里面修改加入启动画面FORM.

to xueminliu:最好加一句：splash.free;


program PrjSender;

uses
Forms,
Usender in 'Usender.pas' {Form1},
Unit2 in 'Unit2.pas' {splash};

{$R *.RES}

begin
splash:=Tsplash.Create(nil);
splash.Show;
splash.update;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(Tlogoform, logoform);
splash.close;
splash.free;
Application.Run;
end.

启动画面里最好不设置定延时。

多人接受答案了。