● DelphiTips 010 - 程序启动画面 - 荔园在线 | 深圳大学学生论坛,荔园晨风BBS,深大在线网站

荔园之美，在春之萌芽，在夏之绽放，在秋之收获，在冬之沉淀

发信人: Peter (小飞侠), 信区: Program
标题: DelphiTips 010 - 程序启动画面
发信站: BBS 荔园晨风站 (Thu Jan 21 21:14:59 1999), 转信

　　在启动程序之前出现启动画面的方法多得是，但有些是调用“记时器”来延时
的，这种方法有时拖慢了程序的启动速度，下面介绍又一方法，给大家参考对比一
下。
　　建一个启动封面窗体，假设为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;

--
※ 来源:．BBS 荔园晨风站 bbs.szu.edu.cn．[FROM: 192.168.1.3]

荔园在线首页友情链接：深圳大学深大招生荔园晨风BBS S-Term软件网络书店