深 深水鲨鱼 Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-21 #1 请问项目的启动画面在这里怎么做的? 就是程序初始化结束后就消失的那种! 最好有代码~谢谢!
U ugvanxk Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-21 #2 application.initialize; aboutform:=Taboutform.create(application); aboutform.show; aboutform.update; application.createform(tmainform,mainform); application.createform(Tdatamodule1,datamodule1); application.initialize; aboutform.close; application.run; 其中aboutform是启动封面,这部分加到 *.prj工程文件中
application.initialize; aboutform:=Taboutform.create(application); aboutform.show; aboutform.update; application.createform(tmainform,mainform); application.createform(Tdatamodule1,datamodule1); application.initialize; aboutform.close; application.run; 其中aboutform是启动封面,这部分加到 *.prj工程文件中
深 深水鲨鱼 Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-21 #3 不好意思我刚刚开始做 可以在告诉我你说的*。prj在那里 ?
P pingbaoshi Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-21 #4 aboutform.close; 后,添加 aboutform.free; application.run;
R ReStart Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-21 #5 新建一个Form,属性修改如下: BorderStyle:bsNone //无边框 Caption: //无标题 Height:=210 PositionoScreenCenter //居中显示 Visible:False //窗口创建时不立即显示 Width:358 Name:=FrmFlash //这个Form的名字 然后你就可以用Image控件放入图片和做其他修饰了 最后,在主程序文件中加入 begin FrmFlash:=TFrmFlash.Create(Application); FrmFlash.Show; FrmFlash.Update; ,,,,//初始化主程序部分 FrmFlash.Hide; FrmFlash.Free; end;
新建一个Form,属性修改如下: BorderStyle:bsNone //无边框 Caption: //无标题 Height:=210 PositionoScreenCenter //居中显示 Visible:False //窗口创建时不立即显示 Width:358 Name:=FrmFlash //这个Form的名字 然后你就可以用Image控件放入图片和做其他修饰了 最后,在主程序文件中加入 begin FrmFlash:=TFrmFlash.Create(Application); FrmFlash.Show; FrmFlash.Update; ,,,,//初始化主程序部分 FrmFlash.Hide; FrmFlash.Free; end;
R ReStart Unregistered / Unconfirmed GUEST, unregistred user! 2001-09-21 #6 工程文件,就是你打开dpr文件以后所显示出来的那个文件