当前位置:主页   - 电脑 - 程序设计 - VFP
看实例学VFP:Timer控件实例-动画
来源:网络   作者:www.bianceng.cn 老马    更新时间:2010-09-26
收藏此页】    【字号    】    【打印】    【关闭

在vfp基础教程-计时器(timer)中已经对计时器控件的属性及方法等做了介绍,这个控件的应用重点是它的Interval属性和timer事件。本文来补充一个例子,运行时在计时器控件的timer事件中控制label控件的位置形成动画效果,如下图:

本例通过在timer事件中操作标签控件的top属性来实现标签上下移动的动画。如果要制作左右移动的动画,原理是一样的,在timer事件中操作标签控件的left属性即可。

本例制作过程:

一、新建表单,width属性值设为290,height属性值设为160,caption属性值设为“编程入门网-用timer实现动画”,AutoCenter属性值设为.t.,保存为“动画.scx”。

二、向表单上添加一个label控件,caption属性值设为“编程入门网”,fontsize属性值设为12,forecolor属性值设为“255,0,0”。

三、向表单上添加一个timer控件,interval属性值设为50。

四、添加事件代码:

timer控件的timer事件代码:

if thisform.label1.top<0 &&成立说明label已经移出了表单的上边界,则重置它的位置
   thisform.label1.top=300
   thisform.label1.top=thisform.label1.top-5 &&向上移动5像素
else
   thisform.label1.top=thisform.label1.top-5 
endif

五、运行“动画.scx”。

本例代码在Win2003+VFP6.0环境下调试通过。

查看全套“菜鸟也学VFP”教程

其它资源
来源声明

版权与免责声明
1、本站所发布的文章仅供技术交流参考,本站不主张将其做为决策的依据,浏览者可自愿选择采信与否,本站不对因采信这些信息所产生的任何问题负责。
2、本站部分文章来源于网络,其版权为原权利人所有。由于来源之故,有的文章未能获得作者姓名,署“未知”或“佚名”。对于这些文章,有知悉作者姓名的请告知本站,以便及时署名。如果作者要求删除,我们将予以删除。除此之外本站不再承担其它责任。
3、本站部分文章来源于本站原创,本站拥有所有权利。
4、如对本站发布的信息有异议,请联系我们,经本站确认后,将在三个工作日内做出修改或删除处理。
请参阅权责声明