说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

Web动画图像分解在VB动画设计中的应用

HTML文档下载 WORD文档下载 PDF文档下载
Web动画图像分解在VB动画设计中的应用
作者:任清珍 黄可
笔者每次浏览Web网页时,总是被许多生动有趣的小动画深深吸引,十分佩服作者的想象力和制作技巧。在使用VB进行应用软件开发设计中,为使软件的人机界面新颖友好,总想加点动画作点缀,但又常常苦于一幅幅动画图片的绘制或寻找!因此萌发了一种奇妙的设想:能否让Web页面上的动画在VB应用软件界面上活起来?幸运的是,当前图像处理软件甚多,终于将笔者的这一设想变成了现实。

VB动画设计

动画的制作原理很简单:首先绘制几幅相近但又有细微变化的图片,然后每隔一段很短的时间就依次显示其中一幅,由于人眼视觉暂留,就能看到连贯的动画效果。

使用VB进行动画设计非常方便,因为其工具箱中有图像、图片、时钟控件。只要获得了一幅幅动画单幅图像文件,把它们放入图像控制数组中去,便可用时钟控件的控制属性Interval来控制每幅图片的显示间隔,把最终动画显示的位置确定好后,按时间间隔依次从图像控制数组中取出一幅图显示。如此交替反复显示,即可产生动画效果,编程实现比较简单。

VB动画设计所能接收的单幅图片文件的格式有四种,即*.Bmp、*.Ico、*.Wmf和*.Dib。其中*.Bmp文件的来源最广,不但可以使用Windows环境下的各种绘图软件来绘制(但费时费力,且不是每个人都有绘画的天才),也可以使用Windows所提供的现成的位图文件,或者用彩色扫描仪扫入等等。在此,笔者所感兴趣的则是从Internet上Web站点网页上下载自己喜爱的动画图像文件,再经过图形软件分解、处理成一幅幅*.Bmp图片文件,它们会给软件的人机界面带来全新的感受。

Web动画图像分解方法

从Web网页上下载静态图像文件比较简单,下载后需要进行分解。

动画图像文件的分解是动画设计的逆过程,即把一个动画效果的图像文件分解形成它的多幅图片文件。可使用GIF Construction Set软件打开(此软件可在许多服务器上下载)要分解的图像文件,该软件即可将动画自动分解为多幅组成动画的单幅图画。

使用上述软件分解后,首先看看是由几幅图画组成的动画,如果有N幅图画,就把动画文件拷贝N份。

然后,逐个打开拷贝文件对每个文件进行处理,处理过程中只需在第一个文件中保留静止的图像,在其它文件中只保留动画图像。

最后,使用具有图形转换功能的图形处理软件如Phtoshop,就可把得到的N个*.Gif图像文件都转换成*.Bmp文件的格式。

Web动画分解过程概括描述如下:

Web动画下载→Web动画分解(GIF Construction Set)→Web动画格式转换(Phtoshop等)。

一个实例

这是一个在数据库查询窗体上设计的眼睛转动查看的动画,此动画的每个单幅图画就是从Web网页上下载分解得到的。

动画设计实现步骤如下:

首先,用上述方法把Web网页上转眼睛动画下载保存、分解、格式转换成二幅画Eyesl.Bmp和Eyes2.Bmp(此动画简单,只由二幅画组成)。

其次,将Eyes1.Bmp和Eyes2.Bmp放入图像控制数组中。 窗体构造简单表示如下:

窗体属性表如下:

程序代码如下:

在窗体的General中声明:

Dim Rotateflag as Integer '交替显示标志

Dim Currenteyes as Integer '当前显示第几幅画窗体装载初始化:

Sub Form_Load()

Rotateflag=1 '进入显示(时钟计数开始)

Currenteyes=0 '第一幅画定位

End Sub

交替显示子程序(时钟控制显示间隔,本例为250ms):

Sub Tmrtimer_Timer()

If Rotateflag=1 Then

'交替显示开始  Simgeyes.Picture=Imgeyes(Currenteyes).Picture '开始显示第一幅画

Currenteyes=Currenteyes+1

'250ms后显示下一幅

If Currenteyes=2 Then

Currenteyes=0

'如果已显示了两幅,则再从第一幅显示

End If

End If

End Sub

结束

利用Web网页动画图像分解成的多个单幅图画,不但可以为VB动画设计提供方便,也可用于VC等动画编程。目前,Internet的范围日益扩大,使Web与软件编程联系起来,无疑提高了应用软件的制作效率和质量。

开发者薪资调查:半数开发者工作十年方可迎来好“薪”情 沟通更畅快 HipChat推出1对1视频和屏幕共享功能 AMD宣布支持DirectX 12 为游戏开发者带来更多福利 开发者薪资调查:2013年哪种编程语言最赚钱? 苹果挖墙脚未果,黑莓高管跳槽被起诉 不看不知道:六个超大规模Hadoop部署案例 豌豆荚发布应用内搜索技术协议 兼容App Indexing Oculus 21岁鬼才创始人:收购不等于改变 Unite China 2014课程解析:Unity教育行业专场免费开放 Instagram技术窥探,助你打造响应式App 切勿妄谈Hadoop,以及4个数据管道打造实践 一周消息树:雨果·巴拉与小米的那些事儿 《近匠》轻邮联合创始人Wesley:移动App要有撼动企业服务的野心 Facebook开源MySQL分支,谷歌、LinkedIn、Twitter等大拿捧场 淘宝明风:基于Graphx的图计算实践分享 调查显示:2015年Android将统治全球操作系统 初创公司最爱使用的那些开发工具 仙剑之父姚壮宪强势加盟Unity游戏及应用大赛 智能可视化平台:DCOS之数据中心抽象 一周热点:5美分/GB的开源存储系统,及硬盘质量“最差”的希捷 英特尔收购可穿戴技术公司BASIS Science 设计移动App的十大技巧 皮皮网陈超:易用与性能兼备,Spark蓬勃发展! Sahara顺利毕业,将加速OpenStack与Hadoop的融合 十大将拯救地球的开源硬件项目 Android应用程序开发者需要了解的五个内容 百度轻应用插件CloudaMySQL诞生记 盘点Github所用的开源项目 开源不只是面对开发者 见证新一代全能大数据计算平台崛起 ——中国Spark技术峰会将于4月19日在北京召开 大佬放猛料的节奏 阿里云聚无线为开发者提供一站式服务 求树型菜单的代码?? 如何使列表控件的第一列居中(包括标题文本和内容文本)??? 用查表法按ALPHA混合R、G、B也会这么慢?奇怪!(有源码)(50 怎样用vc开发一个动态链接库让PB调用,要求参数为字符串 3dmax 的问题 关于用alert("信息!")弹出的对话框 up up up up up up up up up up up up up 请问“IE登录时”为什么Domino检测不到我的Username and password? 着急,这条sql语句怎么写?????? 爱的密码 散分啰!!统计BCB论坛现有成员... 这样的COM组件如何实现? 请教:我想学lotus,可不知哪有lotus和lotus教程下载,望指教! 多选项提交过来的值是什么类型的? ORA-03113: end-of-file on communication channel谁知道??高手救命! 星际争霸几大战略(大家切磋切磋) CHtmlView的刷新问题 关于asp.net加密的讨论 怎么样把两个ArrayList合并成一个??我在文档里找了半天也没找到!急~~!!!!!!!! 》》》菜鸟发问:SQL SERVER2000 可以对 office 文档进行全文检索吗? How to alter DBGrid Scrollheader Color? c怎样访问数据库啊?一定给分! from里的参数传递为ENCTYPE="multipart/form-data"时的问题? 网吧问题 如何在txt文件中查找字符 请问如何实现当进入一个combox时自动下拉列表框(不用用鼠标去点) 关于volatile 修饰词 过去用Delphi开发数据库都是用Access,现在急需使用SQL Server。请问:我必须掌握SQL Server中的那些内容。 如果我想删除日志文件的所有记录该怎么办?????? 怎么样把两个ArrayList合并成一个??我在文档里找了半天也没找到!急~~!!!!!!! 请问,NT4.0下怎样配置网关和路由? 请问如何知道一个弹出菜单是否以经关闭 升级后问题,奇怪,请指教? 什么是存储过程? 大侠们帮忙看看,简单问题 急:因出差,明天(12.20,第二期)的“微软.net高级程序员培训”转让(包括资料)!今晚6:00前联系,13910321169. 请问怎样才能在Access中选取指定行数的记录如第5-10条. 关于XML命名空间的疑问?请教各位高手帮帮忙!谢谢! 请问哪里有《情深深雨蒙蒙》下载??? ******斑竹快出来啊 看看我这个贴子啊!!!!!!!!!!!!!! 如何读取寄存器中的数据? 请问在数据库中如何操作日期型字段: Help,如何把本机加入主域服务器? 急:因出差,明天(12.20,第二期)的“微软.net高级程序员培训”转让(包括资料)!今晚6:00前联系,13910321169 怎么用vbscript定义一个函数阿。我想作一个下拉框的onchange事件,请指教 如何确定adoquery的数据是否被修改了? 有关程序调试的问题 全都转行卖大白菜。 对于各个.h和.cpp文件分工如何,我的各种函数各个变量到底该放在哪个文件中的哪个class中? 如何停止asp调用的dll文件,我调用my_dll.dll文件一次之后就不能对my_dll.dll更改了,为什么?怎样解决? 急:因出差,明天(12.20,第二期)的“微软.net高级程序员培训”转让(包括资料)!今晚6:00前联系,13910321169.. 胡麻油是什么成分?谢谢了,大神帮忙啊 一个梯形的面积是8.1分米²,高是9厘米,上底是80厘米,求下底的长.快. 某城市的一种出租汽车起步价是10元(即行驶距离不超过5km都要付10元车费),达到或超过5km后,每增加一千米加价1.8元(不足1km部分按1km计),现在某人称这种出租汽车从甲地到乙地,支付车费19 一个梯形的面积是70平方米,上底是5米,高是10米,求下底是多少米? 一个长方体水箱长50厘米,宽40厘米,高30厘米里面装满了水,水深20厘米.放入一块棱长为0.1米得正方体钢锭后,水深多少厘米? 一个长方体的封闭水箱,高4分米,里面的水的高度是3分米.如果把这个水箱竖放,那么里面水的高度是 在一个长15分米、宽12分米、高14分米的长方体水箱中,如果在水中沉入一个棱长为30厘米的正方铁块,水没有溢出,那么此时水箱中的水深多少分米? 一个长方体水箱长60,宽50,高40,里面装了水,水深30.放入一块棱长0.3米的正方体钢块后,水深多少厘米?一个长方体水箱长60厘米,宽50厘米,高40厘米,里面装了水,水深30厘米.放入一块棱长0.3米的正方 有一个长方体水箱,宽4分米,深1.这个水箱最多敌装水多少立分方米? 一个梯形,高4.8,若上底和下底不变,高增加2米后,面积增加8.4平方米,那么原来梯形的面积是多少? 我买的菜籽油是黑色的,是不是含有地沟油.求指导! 一块三角形的布料面积是120平方分米底是30分米高是多少分米 在一个长十五分米宽十二分米的长方体水箱中,有十分米深的水.如果在水中沉入一个棱长为三十厘米的长方体铁块,这是水箱中的水深多少分米? 一个长方体水箱长10分米,宽8分米,水深4.把一块石头完全浸于水中,水位上升了3分米,这块石头的体积是多少立方分米? 一个三角形的面积是4分之5平方分米,底边长3分米.底边上的高是多少分米急 已知阴影部分的面积是15平方米,求梯形的面积.【梯形的高是6,下底是9】上底还不知道,这个梯形是2个三角行组成的】 一个长方体水箱,长4分米,宽4分米,高4分米,水深2分米.如果放入一个石块,且石块完全浸没在水中,水面上升1.2分米,那么这个石块的体积是多少分米? 一块正方形布料,边长是15分米,把它裁成两块最大的三角形布料,每块三角形布料的面积是多少? 一个梯形,如果将上底延长3米就会变成一个正方形,面积比原来增加15平方米,原来梯形的面积是多少? 把一个底面边长为5分米的长方体水箱装入半箱水,现将一块石头浸没在水中,水面上升了5厘米,这块石头的体积是多少立方厘米? 三角形的面积是1.05平方分米,求它的底边长x.高长0.7dm 一个梯形,它的下底减少5米,面积就减少15平方米且该梯形就变成一个正方形,求原来梯形的面积? 一个梯形的面积是33.3平方分米,已知它的下底是9.2分米,高是4.它的上底是多少分米, 一个平行四边形,他的底是2.8分米,比高少0.2分米,面积是()平方分米. 熟过的饺子放冰箱四天了还能吃吗?四天前吃剩下的饺子和烧鸡放冰箱了的不知道现还能吃吗?一般这类东西能在冰箱放几天?还有什么熟食在冰箱能放一周以上的? 一个梯形的面积是33.3平方分米,已知它的下底是9.2分米,高是4.它的上底是多少分米, 底是15分米 底比高的一半多1分米.求四边形的面积 死飞的链条淋雨了会不会生锈 在一个长25厘米,宽20厘米的长方形水箱中倒入5升水,再把一个不规则的石块放入水中,这时水面高15厘米,求石块体积?一块刚重3900千克,它的长是10米,宽2.5米,如果每立方米的刚重7.8千克,这块钢的 洗衣机长60厘米,宽40分米,高85厘米,做一个洗衣机布罩,至少要多大面积的布谢谢了,大神帮忙啊 一个长方体水箱,从里面量40厘米,宽30厘米,深35厘米,注入10厘米深的水,再放入一个棱长20厘米的长方体铁块(铁块的顶面仍高于水面),这时水箱里的水面高多少厘米? 在长为15厘米,宽为10厘米的水箱中,有10厘米深的水.现在往水中放入一石块,全部没入水中后,水上升了4厘求石块的体积是多少? 某市出租车收费标准是起步价5元超过三千米后没增加0.5千米加收0.9元,李老师乘坐这种车从甲地到乙地共支付19.4元,他从甲地到乙地经过的路程最可能是多远? 一个梯形上底乘高得36平方分米,下底乘高得84平方分米.这块梯形的面积是( )平方分米. 已知一个梯形的面积是18平方分米,它的上底4.下底是7.高是多少分米?(方程解答) 某城市的出租车起步价10元(即行驶5km以内都需支付10元车费)达到或超过5km后,每乘某城市的一种出租车汽车起价是10元(即行驶路程在5km以内都需付10元车费),达到或超过5km后,每增加1km加价1.2 糖果店要调制5500千克巧克力奶糖他的巧克力和奶的质量比是2:9.需要巧克力和奶各多少千克? 一个梯形的面积诗36平方分米,上底是9.4分米.它的高是多少分米?(用方程解) 一个梯形的面积是25平方分米上底4.8分米下底是5.2分米高是多少分米 一个梯形的面积是24平方分米,上底和下底的和是8分米,那么高是多少分米? 一个正方体的棱长是6厘米里面装满水,把它倒人长8厘米,宽5厘米的长方体水箱中,这时有多深? 一个梯形的面积是208平方分米,上底是5分米,下底是8分米,高是( ). 一个梯形的面积是120平方分米,上底是9分米,下底是15分米,它的高是多少分米?用列方程计算说错了是用字母和数字计算 一个长方体水箱,从里面量长30厘米,宽12厘米,水深8厘米.把一个棱长6厘米的正方体放入箱内,使正方体浸在水中,水箱的水上升了多少厘米? 某城市一种出租汽车起步价是10元行驶路程在5km以内都需10元车费),达到或超过5km 一个梯形的面积是120平方分米,高是8dm.这个梯形的上底和下底的和是()dm. 一个梯形的面积是68.4平方分米,它的上、下底之和是36平方分米,那么它的高是什么? 一个长15厘米宽十厘米高5厘米的长方方体水箱,里面水深三米,把这个容器密封后,让长十厘米宽五厘米的面朝下(即作底面),这时里面的水深是多少厘米 梯形的面积是120平方分米,高是8分米上底是多少分米 长方体石块长6厘米,宽4厘米,投到一个棱长为20厘米的正方体水箱中,石块全浸没在水中,水面升高了0.3厘米长方体石块的高是多少 一个梯形的面积是21.96平方分米,高是3.6平方分米,上底是5.4分米.当这个梯形的上底逐渐缩短,最后成为一点时,它就变成了一个()形.此时它的面积是()平方分米? 一个梯形的面积是30平方分米,它的上底6分米,下底是9分米高是多少分米?(列方程解答)有两题在一幅地图上,用12厘米长的线段,求这幅地图的比例尺.谢谢锅位了. 如何识别地沟油制成的假冒成品桶装菜油? 一梯形面积21.96平方分米,6分米,下底6.8分米,上底多少分米?快------------------------------------------! 一个梯形的面积是50平方分米,高是4分米,下底是15分米,这个梯形的上底是多少分米?(列方程解答)救命啊! 已知梯形的面积是8.1平方分米,上低80厘米,高9厘米.求下底是多少? 一个梯形的面积是18平方分米,上底3.6分米,下底6.4分米,高是多少分米? 香油勾兑配方 一个梯形的面积是1.8平方分米,高是9厘米,上底长80厘米,求下底长.列方程解答. 一个梯形的面积是66平方米,梯形的下底是14米,高是6米,这个梯形的上底是多少米?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn