首页 | 社区 | 博客 | 招聘 | 文章 | 新闻 | 下载 | 读书 | 代码
亲,您未登录哦! 登录 | 注册

从Web站点读取Flash动画演播的PB6.5编程

打印文章

分享到:
---- Flash动画不仅包含动画,还可有声音、超文本连接,同时由于它是矢量格式文件,生成的这种包含动画、声音等的文件(*.swf)很小,非常适合在网络上传输使用,因而在当前Web网页技术中得到很快发展。本文讨论在PowerBuilder6.5数据库编程中用Flash4提供的控件"Swflash.ocx"进行Web站点访问,获取Flash动画播放。

---- 下面是具体作法:

建立应用对象
---- 运行PB,选菜单"File | New"建立一个应用对象,将它起名为app_flash,并将其应用对象库起名为flash.pbl存盘;选工具栏的图标"Window"放入一个窗口,起名为w_flash,在这个窗口中放下述控件:一个单行文本编辑框(SingleLineEdit)sle_1用来输入要提取进行演播的Flash动画文件(*.sws)所在的URL's(存放在本机磁盘或存放在Internet远程Web服务器的Flash动画文件);两个命令按钮(CommandButton)cb_1用来执行提取并演播键入文本框sle_1中的Flash文件,命令按钮cb_2用来退出软件运行。


用OLE连接 Flash 4的控件Swflash.ocx
---- 选菜单"Cotrols | OLE",出现窗口"Insert object",选"Insert Control",在Control Tyle栏里找出"Shockware Flash Object"(若该控件尚未注册,可先选"Register Now"对该控件进行注册);回到PB窗口,用鼠标点击安放此控件在窗口上并调整大小。(再用鼠标右击,出现浮动菜单,选"OCX Property"设置控件的属性)。


对Flash 4的控件的主要属性
---- Flash 4的控件Swflash.ocx主要提供了下列属性在编程中使用:

---- Movie属性:存放Flash动画文件的URL's:在本机磁盘时写全目录名,例如: d:\lxrj\lixiang\lxpaper\2000\t04\bol.swf 在Internet上按浏览网页的方式:例如(下面是实际存放在贵州大学Web服务器上的一个Flash文件) http://www.gzu.edu.cn/~lixiang/bol.swf

---- Quality(分辨率)属性:播放的分辨率,有0(low),1(AutoLow),2(Hight),3(AutoHight),4(Best)五个值

---- Scale属性:播放的屏幕,有0(ShowAll), 1(NoBorder), 2(ExactFit)三个值

---- Loop(循环播放)属性:true, false

---- menu(菜单)属性:true, false


对Flash 4的控件Swflash.ocx进行编程
---- 明白了Flash控件的主要属性后,即可根据应用的需要进行编程,在我们上面对窗口的安排中,仅需对"播放"按钮cb_1的clicked事件录入下述代码即可(不愿编代码的读者可以用鼠标右击窗口的OLE控件界面,打开属性页填写):

ole_1.Object.movie=sle_1.text
ole_1.Object.scale=0
ole_1.Object.loop=true
ole_1.Object.Quality=4
ole_1.Object.Scale=2
ole_1.Object.menu=true

---- 为方便退出,在另一个命令按钮cb_2的clicked事件中录入代码:close(parent)

运行测试:
---- 关闭窗口w_flash,回到应用对象app_flash,选菜单"Entry | Script",在open事件中录入代码: open(w_flash) 后选图标"Run",运行(URL's:http://www.gzu.edu.cn/~lixiang/bol.swf是贵州大学站点,24小时开放,有兴趣的读者可用来调试这个程序)。

本栏文章均来自于互联网,版权归原作者和各发布网站所有,本站收集这些文章仅供学习参考之用。任何人都不能将这些文章用于商业或者其他目的。( Pfan.cn )

编程爱好者论坛

本栏最新文章