社区
Delphi
帖子详情
关于Flash文件操作(重金悬赏!!!)
ofan
2003-07-28 10:23:43
我想编一个Flash播放器,需要对Flash文件(SWF)进行操作。请问各位大虾除了使用控件外还有没有别的方法操作Flash文件。谢谢谢谢!
100分呦!!!
...全文
191
8
打赏
收藏
关于Flash文件操作(重金悬赏!!!)
我想编一个Flash播放器,需要对Flash文件(SWF)进行操作。请问各位大虾除了使用控件外还有没有别的方法操作Flash文件。谢谢谢谢! 100分呦!!!
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
8 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
dawnming
2003-07-29
打赏
举报
回复
up
mrtxc
2003-07-29
打赏
举报
回复
楼主不想用控件,那你就自己写吧,参照TShockwaveFlash的源码!!!
不过有点麻烦,
myboor
2003-07-29
打赏
举报
回复
楼上果然是高
谢谢
我也一直想玩
karach
2003-07-29
打赏
举报
回复
Delphi播放Flash
一.播放Flash
首先,你的机器里要装有Flash播放软件(你的IE能显示Flash)。IE之所以能显示Flash是安装了由Macromedia公司提供的swflash.ocx控件,我们可以在Win98的$Windows\System\Macromed \Flash中或在Win2000中的$Winnt\System32\ Macromed\Flash中找到它。ActiveX控件在Windows里是通用的,Delphi也同样支持。
运行Delphi后,选择选单Component→Import ActiveX Control,找到SWFlash.OCX 文件进行安装。安装完成后,ActiveX面板里出现TShockwaveFlash控件,这是Delphi对SWFlash.OCX的封装,现在我们就可以用这个控件来播放Flash了。拖一个Flash过来,放在Form上,指定其Movie属性为d:\test.SWF,并按F9键加以运行即可。怎么样,运行效果不错吧?
TShockwaveFlash主要属性如下:
ReadyState:读一个flash文件时的状态,其中包括0=Loading、1=Uninitialized、2=Loaded、3=Interactive和4=Complete;
TotalFrames:总帧数,只有当ReadyState = 4时才能访问该属性;
FrameNum:当前播放的帧;
Playing:播放或暂停一个flash;
Quality:指定当前渲染的质量,包括0=Low, 1=High、2=AutoLow、3=AutoHigh;
ScaleMode:缩放模式,0=ShowAll、1= NoBorder、2 = ExactFit;
AlignMode:对齐模式,Left=+1、Right=+2、Top=+4、Bottom=+8;
BackgroundColor:背景色,-1为默认颜色;
Loop:是否循环;
Movie:指定播放的flash文件路径,可以为一个URL。
TShockwaveFlash主要方法如下:
Play():开始播放动画;
Stop();停止播放动画;
Back();播放前一帧动画;
Forward():播放后一帧动画;
Rewind():播放第一帧动画;
SetZoomRect(int left, int top, int right, int bottom):设置缩放的区域;
Zoom(int percent):按百分比缩放;
Pan(int x, int y, int mode):缩放播放面板,其中模式0为按像数、1为按窗口百分比。
TShockwaveFlash主要事件如下:
OnProgress(int percent):读取一个flash时触发;
OnReadyStateChange(int state):状态改变时触发。states的值可以为0=Loading、1=Uninitialized、2=Loaded、3=Interactive和4=Complete。
jpyc
2003-07-29
打赏
举报
回复
关注
tresss
2003-07-29
打赏
举报
回复
没有听说,可能有难度吧!
zhksoft
2003-07-29
打赏
举报
回复
01年好象看电脑报介绍过一个17岁的小伙用VB做过一个flash播放的软件 ,可惜忘了是哪 一期的了,你再搜一搜吧!!技术上应该是能实现的。
另外,flash文件存为EXE文件,在文件头要加一段调用程序,SWF文件在EXE文件的后面,网上也有过介绍,你好好搜一搜。时间太长不记得了。可以借鉴一下,汇编好的话,你的问题就能解决。
things
2003-07-28
打赏
举报
回复
还可以调用FLASH播放器播放SWF文件
重金
悬赏
,如何实现abaqus与star ccm+的简单流固耦合
重金
悬赏
,如何实现abaqus与star ccm+的简单流固耦合,必有重谢
重金
悬赏
:OpenStack实践文章
近几年来,云计算技术大行其道,逐渐在各行各业中生根发芽,并获得良好的收效。现CSDN联合IBM developerWorks(dW)中文社区举办专栏活动,面向广大CSDN网友征稿。第一期活动征集的主题是“OpenStack实践分享”。分享您的实践经验,与同行交流技术方案,不仅可以展现您的才华,还能获得丰厚的稿酬! 只要您的文章一经采用,即可获得每篇文章3000元的高额稿酬。 开源云平台
华为交换机更换
flash
文件
2019独角兽企业
重金
招聘Python工程师标准>>> ...
44万美元!马斯克
重金
悬赏
“AI女友”开发者,网友:让我来
此次 xAI 开出的薪资范围为 $180,000 – $440,000 美元,当然薪资只是 xAI 整体薪酬方案的一部分,另外还包括:股票期权(Equity),全面的医疗、视力和牙科保险,401(k) 退休计划,短期和长期伤残保险,人寿保险,各类员工优惠与福利,可谓诱惑满满。AI 的边界在哪里?而抢人的手段,一如既往——砸钱。虽然打造二次元风格的 AI 角色听上去像是个轻松有趣的“虚拟伴侣”实验,但从这场高薪招聘背后,也不难看出 xAI 有更大的野心:他们想构建的是更具个性、情感互动更强的 AI 伙伴。
速来 开源中国首届飞算SoFlu组件开发
悬赏
赛来袭
高额赏金!专家指导!工作机会!一次性全部抱回家!
重金
悬赏
,顶尖对决,开源中国首届飞算SoFlu全自动软件工程平台组件开发
悬赏
赛火爆来袭! 此次比赛由开源中国与飞算科技共同举办,面向Java工程师,基于飞算SoFlu全自动开发平台组建协议,开发一个用于本地、远程执行脚本及一般linux命令的SHELL组件。 开源中国作为国内最大的开源技术社区,拥有超过300万会员,持续关注国内软件发展,此前,已经与华为、阿里云等知名企业达成战略合作,发布众多
悬赏
任务,并获得业内高度关注与响应。 而飞算SoFlu全自
Delphi
5,930
社区成员
262,936
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章