易表在线答疑技术与交流精华分享 → 在易表中实现动画效果(老许原创)


  共有8936人关注过本帖树形打印复制链接

主题:在易表中实现动画效果(老许原创)

帅哥哟,离线,有人找我吗?
喜爱易表
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:天使 帖子:178 积分:0 威望:0 精华:0 注册:2006/8/11 11:09:00
在易表中实现动画效果(老许原创)  发帖心情 Post By:2006/8/16 19:09:00 [只看该作者]

[操作技巧]在易表中实现动画效果

(以ahlky351351帖子为例,取自http://218.104.78.90:81/dispbbs.asp?boardID=1&ID=14921)
   目前易表不支持动画格式的图片,但是我们可以利用易表提供的功能让图片动起来,间接地实现动画效果。操作步骤如下:
   1、准备3幅动作连贯的图片(如1.jpg、2.jpg、3.jpg);
   2、新建文件,只保留第一行第一列,多余的行和列全部删去。将列类型设为图片型,并将文件保存在图片所在目录;
   3、设置数值型变量%a%;
   4、设计录入窗口,命名为“动画”;
   5、插入计时器控件,双击控件图标,在打开的窗口中将执行间隔设为0.1,将命令公式设为:
   if([%a%] > 0,SetVariable("%a%",[%a%]-1), True ) And
   if([%a%] =1,Setcelltext(gridname,row,1,"3.jpg"),
   if([%a%] =2,Setcelltext(gridname,row,1,"2.jpg"),
   if([%a%] =3,Setcelltext(gridname,row,1,"1.jpg"), True ))) And
   if([%a%] =0,SetVariable("%a%",4), True )
[UploadFile=2003111565827600_1155726508.gif]

公式解析:
   该公式由3个部分组成,中间以And相连。
   第一部分:if([%a%] > 0,SetVariable("%a%",[%a%]-1), True ),意思是,如果“%a%”大于0,它的新值是原值减1;如果“%a%”等于或小于0,则进入下一步(实际上%a%不可能小于0,看了第三部分公式你就明白了)。
   第二部分:if([%a%] =1,Setcelltext(gridname,row,1,"3.jpg"),
             if([%a%] =2,Setcelltext(gridname,row,1,"2.jpg"),
             if([%a%] =3,Setcelltext(gridname,row,1,"1.jpg"), True )))
   意思是,如果“%a%”等于1,则向当前表当前行第一列写入“3.jpg”;如果“%a%”等于2,则向该单元格写入“2.jpg”;如果“%a%”等于3,则向该单元格写入“1.jpg”。
   第三部分:if([%a%] =0,SetVariable("%a%",4), True ),意思是,如果“%a%”等于0,它的新值则为4。如果“%a%”大于或小于0,则进入下一步(即回到第一步)。
   “%a%”不可能小于0,因为“%a%”如果等于0,它的值便立即被新值4所代替,然后又是4-1=3,3-1=2,2-1=1,1-1=0。4、3、2、1、0、4…不断循环,第一行第一列的内容则相应地变换为1.jpg、2.jpg、3.jpg、3.jpg(“%a%”为0时不向指定单元格写入新内容)……周而复始,不断变化。

   6、插入字段“第一列”,调整大小使其与图片的尺寸相当。保存窗口退出,显示录入窗口,计时器开始工作,单元格中的数据及窗口中的图片不断变化,动画效果就出来了。
[UploadFile=2003111571255829_1155726528.gif][UploadFile=2003111577484018_1155726543.gif]


 回到顶部