一般软件在运行后会产生一个闪现的图形窗口(窗体里加载了图片),然后到主窗体
再执行登录,请问之前的闪现窗体怎么做?
再执行登录,请问之前的闪现窗体怎么做?
解决方案 »
- 程序如何实现备份和恢复几个固定的数据表数据(delphi)
- 100分求关于用多线程读取PLC数据的实现方式????????
- Delphi2005中TTreeView节点Data挂的指针释放问题?
- 请问创建临时表的语法问题(还没解决,着急啊~~~~~)
- [在线等待]Delphi中的table控件如何进行多字段条件的查询
- 三层中打开表速度问题?
- 有关实时判断屏幕任两点坐标的问题,在线等
- 计算机重启
- 如何解决图片闪烁问题????
- LISTBOX中的小问题
- 如何实现通过按钮触发把网上的SQL2000数据库中某一个已知的表,导入到本地的SQL2000数据库中?
- 大家讨论一个关于一个医疗系统的数据库及程序一些问题
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TF_Splash, F_Splash); //闪现窗体
//加入延时程序
Application.Run;
Application.CreateForm(TF_Splash, F_Splash); //闪现窗体
这后加入:
F_Splash.Show;
在Application.Initialize;这后面加上
Form3:=TForm.Create(Application); #
Form3.show; #
Form3.Refresh; #
.
. 自动创建别的窗体
.
Form3.hide; #
Form3.Free; #
Application.Run;ok了,带#号的语句都是要求自己写的,
Form2:=TForm.Create(Application)
Form2.show;
...初始化工作
Form2.hide;
Form2.Free;
Application.CreateForm(TForm1, Form1); //主程序
Application.Run;
Form2:=TForm.Create(Application)
编译就出错
应该就没问题了
新建一个form2,把它设计好,比如插入图片等,搞得漂亮一些
然后拉一个timer控件下来,设置其Interval属性为2000(可根据需要自定义),再为其OnTimer事件添加语句close;
然后在主窗口form1中创建OnActivate事件,procedure TForm1.FormActivate(sender:TObject);
begin
Form2.Showmodal;
end;