解决了Flash ActiveX播放中的数个难题,请帮忙测试一下:) (300分)

  • 主题发起人 主题发起人 pihome
  • 开始时间 开始时间
P

pihome

Unregistered / Unconfirmed
GUEST, unregistred user!
查找老贴子,Flash ActiveX播放中下面两个问题一直没有得到解决
1. 流方式播放
2. 声音的控制

这两天不断的调试、测试,基本上搞定了上面两个问题
现在将其封装为一个新的控件,我将之命名为 CoolFlash(版本是V2,因为很早以前V1就已经诞生了,只是上面几个问题一直解决不了没办法升级而已[:)])

CoolFlash V2 的特点是:
1. 内存流方式播放文件,与Flash ActiveX的版本无关,暂不支持 http 方式播放
现在实现了的功能是 从文件中加载,从流中加载,保存到流中,保存到文件中
2. 声音的控制: 自由控制音量的大小,声道的左右平衡,单独控制左右声道音量大小(Flash的帮助中如是说,但实际测试中最后一点没有效果,可能与具体的声音格式有关)
[red]注意:[/red] 此项功能需要Flash ActiveX V6以上版本的支持,但实际测试中我找到的V6.0.23.0无效,V7.0.14.0正常,其他版本是否支持,还需要各位帮我测试一下[:D]
3. 支持播放压缩与未压缩的SWF文件,可以直接播放Flash的EXE文件,因为解决了第1点问题,所以不会象以前解决这个问题一样产生临时文件:)
[red]注意:[/red] 经测试,有一些压缩过的SWF文件无法播放,如Showgood的《小兵》,用ZLIB解压时出错,猜测可能是作了一些保护,不知道有没有哪位DFW知道的,能指点一下:)
4. 分析原文件格式,直接读取Flash的 影片大小、总帧数、帧率、背景色
5. 支持截图,无闪烁缩放,右键屏蔽。这几点以前也算是个不大不小的问题,现在应该都没什么难了。
6. 获取播放中实际的帧速。实际测试中发现可能造成一些压缩过的文件无法播放,所以暂时取消此功能。同时发现Flash的ActiveX要比EXE慢许多,EXE中实际帧速与设定的帧速相差无几,比较稳定,而同样的文件用ActiveX播放,在帧速比较低的情况下两者相差不大,但帧速设定比较高时会慢许多,实际测试中一例,设定为60FPS,EXE播放在60左右波动,ActiveX中只有40左右。

花了几个小时写了个测试程序,界面也不求好看,功能有就行了:)
如果你感兴趣的话可以下载试试
下载地址: http://www.pihome.net/CoolFlash.exe
文件大小: 203K

再说明一点,如果想测试声音控制,请升级到Flash ActiveX的最新版本V7,如果你有V6比较高一点的版本,也可以测试一下是否可行,请跟贴写下测试结果或者将测试结果发送到 pihome@126.com 如果你有相关的资料或者是某些低版本的文件播放不了、出错等,也请你发送到上面的邮箱中:)

BTW:
我的系统环境: Win2K Pro + D7 + Flash ActiveX OCX V7.0.14.0
因为现在BUG还很多,比较乱,所以源代码暂时不公开。
 
Flash Player SDK?
 
不错
给个您的控件玩玩,chenshaizi@163.com
 
帮你测测看
 
初步测试感觉不错!
对版本4声音的控制无效
 
To pihome:
希望能看到你的源码,向您学习之!yckxzjj@163.com
 
to 爱元元的哥哥:
参考过一些,有些功能是结合了Flash AS做出来的
to all:
过段时间整理好,完善一点之后我会放上来的
 
怎么我的贴子没什么人关注,灌水的都没有啊[:(]
请各位看过之后随便发表一下意见啦[:)]
 
哈,这阵子我正想做个flash播放器,本想自己封装个控件,不过看来现在不用啦,楼上的可不可发个给我
yaoqiaofeng@sohu.com
 
源代码公开大家帮你看看不就好了。
 
你好!我是楚辞。按你所说的方法我试过了并配备了SQL SERVER数据库,但是提示SQL SERVER 不存在或拒绝访问。。。。。。以下是你提供的方法:
ADOConnection1.ConnectionString := 'Provider=SQLOLEDB.1;password='+i_passwd.text+'Persist Security Info:=True;username='+i_server_add.Text+';InitialCatalog=MISData;DataSource=trqjcs1'
你能抽出时间来吗?我想把我的程序发给你,你给仔细看看。。。。。。
我的邮箱是WWEI651@163.COM.qq是:195425812希望能得到你的帮助!
 
感觉很好,确实以前的很多难关在此都解决了。由于时间短,有什么BUG还没有发现,能不能把你的控件或源码发一个来研究研究?email:chuanxue_1999@tom.com
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部