关于splashform启动窗体的一些问题？(100分)

我的程序需要在运行前出现一splashform显示一些有关程序信息如：程序名等等。。。。
有一种方法是这样：
application.initialize;
splashform:=tsplashform.creat(application);
splashform.show;
splashform.update;

splashform.hide;
splashform.free;
application.run;
这样的话，SPLASHFORM一闪而过。如果我的SPLASHFORM显示时间可设定且按任意键
将出现主窗体。各位有什么好办法。

在form里的onclick或者onkeydown里继续你的程序。

snake:
小弟资质愚钝，能否说的更清楚一些。你所说的FORM不知是不是主窗体。

在project的source里写
with TSplashForm.Create(nil) do
begin
showmodal;
Application.CreateForm(TForm1, Form1);
Application.Run;
hide;
free;
end;

在SplashForm的onkeydow过程写
procedure TForm2.FormKeyDown(Sender: TObject
var Key: Word
Shift: TShiftState);
begin
close;
end;

OK