4874
社区成员
- 全部
- 语言基础/算法/系统设计
- 数据库相关
- 图形处理/多媒体
- 网络通信/分布式开发
- VCL组件开发及应用
- Windows SDK/API
- 问答
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
匿名用户12345 2002-09-01
楼上的你试过你说的方法了么?
我认为这么做，form2只会一闪就启动form1了。
我认为这么做，form2只会一闪就启动form1了。
cowboy1999 2002-09-01
试试TSplashForm
delphi009 2002-09-01
在启动程序之前出现启动画面的方法多得是，但有些是调用“记时器”来延时的，
这种方法有时拖慢了程序的启动速度，下面介绍又一方法，给大家参考对比一下。
建一个启动封面窗体，假设为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;
匿名用户12345 2002-09-01
首先建立一个窗体,然后设定窗体方式,设定隐藏最大化,最小化,关闭按牛
窗体上放一些你想放的东西，比如作者，版权
用sleep(integer) 参数为毫秒,表示延迟多少时间.
然后自动打开主窗体.
释放此窗体
很简单的，很多书上都有.
窗体上放一些你想放的东西，比如作者，版权
用sleep(integer) 参数为毫秒,表示延迟多少时间.
然后自动打开主窗体.
释放此窗体
很简单的，很多书上都有.
