程序的启动画面如何做？

[wangzn1979]

程序的启动画面如何做？
当程序启动以后，这个画面自动消失
最好能告诉我源代码。
谁先告诉我，就是100分

[匿名用户12345]

首先建立一个窗体,然后设定窗体方式,设定隐藏最大化,最小化,关闭按牛

窗体上放一些你想放的东西，比如作者，版权

用sleep(integer) 参数为毫秒,表示延迟多少时间.

然后自动打开主窗体.

释放此窗体

很简单的，很多书上都有.

[delphi009]

在启动程序之前出现启动画面的方法多得是，但有些是调用“记时器”来延时的，
这种方法有时拖慢了程序的启动速度，下面介绍又一方法，给大家参考对比一下。
　　建一个启动封面窗体，假设为Form2，先设置好BorderIcons、
BorderStyle、FormStyle、Position，接着在窗体上加入图片框、文本框，
设置好后在菜单里选Project里的Options，把Form2从Auto-create forms
里转到Available forms。再接着就是按Ctrl+F12键，选Project1，出现工程单元，
其内容如下
...
Application.CreateForm(TForm1, Form1);
Application.Run;
..
　　在Application.CreateForm(TForm1, Form1); 前加入如下语句：
form2:=tform2.create(application);
form2.Show;
form2.Update;
　　然后在Application.Run;前面加入如下语句：
form2.hide;
form2.free;

[cowboy1999]

试试TSplashForm

[匿名用户12345]

楼上的你试过你说的方法了么?

我认为这么做，form2只会一闪就启动form1了。