请问怎么做程序开始的一闪的图片(或是动画)效果??(50分)

  • 主题发起人 主题发起人 happyallday
  • 开始时间 开始时间
H

happyallday

Unregistered / Unconfirmed
GUEST, unregistred user!
谢谢解答!
最好是有源代码,谢谢先!
 
Application.Initialize;
WelForm:=twelform.create(WelForm);
WelForm.Show;
WelForm.Update;
Application.CreateForm(TKQMainForm, KQMainForm);
Application.CreateForm(TInsDutyForm, InsDutyForm);
WelForm.Close;
Application.Run;
 
想要时间长点
Application.Initialize;
WelForm:=twelform.create(WelForm);
WelForm.Show;
WelForm.Update;
sleep(3000);
Application.CreateForm(TKQMainForm, KQMainForm);
Application.CreateForm(TInsDutyForm, InsDutyForm);
WelForm.Close;
Application.Run;
 
对不起,我不是太懂,,我不太能借鉴您的程序??
但是还是谢谢你了,我会在仔细的体会的,谢谢
 
选择菜单project/viewsource,然后加入一少的程序试一试
 
[Error] Project1.dpr(15): Undeclared identifier: 'WelForm'
[Error] Project1.dpr(19): Undeclared identifier: 'TKQMainForm'
[Error] Project1.dpr(19): Undeclared identifier: 'KQMainForm'
[Error] Project1.dpr(20): Undeclared identifier: 'TInsDutyForm'
之类的错误,是否要定义这样的一些窗口??
但是在我的程序中不想要这些窗口,因为在这些窗口先,我已经有了
Application.CreateForm(TForm1, Form1);
//Application.CreateForm(TForm2, Form2);
Application.CreateForm(TForm3, Form3);
的应用程序了,谢谢各位大侠,谢谢
 
Application.Initialize;
Form2:=tform2.create(Form2);
Form2.Show;
Form2.Update;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TForm3, Form3);
Form2.Close;
Application.Run;

这样的话,就在程序启动前先显示Form2了。
不过,你不能在Project的Options里将Form2置为自动建立。
 
谢谢,上面的程序调试成功,但是我想在开始的时候停段时间,用一少大侠的sleep会报错
请问,还有什么办法??我想是否可以在form2中的createform事件中加sleep,但运行好像
不行,而且好像在闪的那一刻,没看见我要的图片??请问是怎么一回事呢??
再次谢谢nywjx,一少,饿狼传说和各位大侠,谢谢赐教
 
谢谢各位,我知道勒,谢谢
 
不会出错啊。这段程序放在工程文件里。
你的图片房子那里啊?
 
后退
顶部