[界面]程序启动欢迎窗体(Splash) 制作方法(附原码) _程序员之家([界面]程序启动欢迎窗体(Splash) 制作方法(附原码) )

开发技术指南» 文章正文

引言： [界面]程序启动欢迎窗体(Splash) 制作方法(附原码)

摘要：定时运行这个问题其实老早就接触到了，不过在上次的程序中似乎没有很好的解决这个问题，并且没有深入下去。这次再次碰到同样的问题，在查找了网上的资料以后，对这一问题有了比较深的理解。在程序中实现定时运行的思路：由timer控件实现两个timer控件，其中timer1负责每一分钟检查一次系统时间和设定时间的差值，如果两者相差5分钟，则继续检查，直到当相差时间小于5分钟，触发timer2，timer2的定时......

·crc32生成码表方法实现。。。。。 »显示摘要«

摘要： table:array[0..255] of dword;procedure maketable();var i,j,crc:integer;begin for i:=0 to 255 do begin crc:=i; for j:=0 to 7 do begin if (crc and 1)<>0 then crc:=(crc shr 1) xor $edb88320 else c......

[界面]程序启动欢迎窗体(Splash) 制作方法(附原码)

[界面]程序启动欢迎窗体(splash) 制作方法(附原码)

【程序编程相关:[原创]Delphi中ScriptCon】

发表时间:2004-8-10 【推荐阅读:用程序模拟键盘和鼠标键盘】

举个例子,你自己看吧,挺简单的【扩展信息:实现窗口从实变透明到消失这是一个例子】

作者:未知[获得此文档时候没有作者记录,深感抱歉,本文档全为转载]

　　在许多应用软件中,启动程序后,在主导界面出现之前,有一个一般以图象为主,文字为辅的画面,通常用来显示软件或公司的主题标志.软件名称.作者.版权与版本信息等,停留数秒或按了任意键后软件进入主导界面,这个画面称为splash画面,意思为引人注目画面.这个画面的另外一个用处是在处理耗时进程时,为用户展示一幅优美.舒心的图象.

　　其实在delphi中可以很容易实现这一技巧.下面用一个例子来逐步说明如何实现splash画面.

　　1在你的程序中增加一个窗体,把它的名字改为splashform,borderstyle属性设置为bsnone,position属性设置为poscreencenter.

　　2为splashform窗体增加一系列必要的构件,如label.panel.image.shape以及bevel等.

　　3使用ide的project|option功能项把splashform窗体从auto－create表移到available 表中.

　　4将splashform窗体的unit加入到主窗体unit的uses语句中.

　　5在主程序的.dpr文件中加入一段控制代码,位置是在begin之后.其他代码之前,代码如下:

　　 splashform:=tsplashform.create(application);

　　 splashform.show;

　　 splashform.refresh;

　　其目的是在建立其他窗体及运行程序之前,建立并显示splash窗体.

　　6编写主窗体onshow事件的响应过程.

　　 splashform.free;

　　在本例中,这段代码作用为当屏幕显示主窗体时,释放splash窗体.

　　7最后,为主程序的.dpr文件写一段延迟程序,目的是使splash画面在屏幕上有一段停留的时间.最简单的办法使用一个无效循环,如:

　　 var i,x:longint

... 下一页

·递归清空窗体上所有文本框，下拉框中的文本 »显示摘要«

摘要：{*单元说明：递归清空窗体上所有文本框，下拉框中的文本。作者：笔名：易一英文名：yeeyeee-mail ： jane1437@163.com创建时间： 2005年3月24日及最后修改时间：修改人修改时间及：修改说明：版权声明：版权所有，转载请注明本人邮箱，笔名，并保证文章的完整性。*}//函数单元。procedure tformcybase.cleartext(acontrol:......

» 本期热门文章：

· 热门栏目：

» 相关精选文章

» 其它相关：