看实例学VFP:Timer控件实例-动画时间:2009-03-14 www. 老马
- 在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环境下调试通过。 |
|
来自: happyngkmw > 《实例学VFP》