社区
Delphi
帖子详情
关于flash.ocx文件路径的问题
sqzg
2003-12-09 06:06:01
请问用flash.ocx文件在程序中播放flash时,flash的路径可以用相对路径吗,
我试了几次好象不行,请智能的同行指点一下。如果不行,请问还有没有这方面的控件。谢谢
...全文
410
4
打赏
收藏
关于flash.ocx文件路径的问题
请问用flash.ocx文件在程序中播放flash时,flash的路径可以用相对路径吗, 我试了几次好象不行,请智能的同行指点一下。如果不行,请问还有没有这方面的控件。谢谢
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
yeeyee
2003-12-17
打赏
举报
回复
播放的是 *.swf 文件
steventone
2003-12-17
打赏
举报
回复
一.播放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主要属性、方法和事件,以便于读者开发。
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。
soundbug
2003-12-10
打赏
举报
回复
同意楼上的
zjm107
2003-12-10
打赏
举报
回复
不能用相对路径也没有关系啊
可以这样用ExtractFilePath(Application.ExeName)得到应用程序的路径,然后在用这个路径组合成flash文件的路径不就OK了吗。
还有我没有看明白你只的是OCX控件不能用相对路径,还是flash文件,如果是OCX控件,你应该在安装程序的是后安装注册OCX控件,这样你的应用程序才能用,或者在打包的时候把flash的插件的安装包一起打进去,安装程序的时候先安装flash就OK了
基于
Flash
.
ocx
的透明
Flash
动画效果
摘要:VB源码,多媒体技术,
Flash
.
ocx
,透明
Flash
动画 VisualBasic6.0编写实现基于
Flash
.
ocx
的
Flash
播放程序VB源代码,透明的
Flash
动画,代码内的App.Path在此的作用是自动识别
文件
路径
。
VB 设计注册ActiveX控件程序, 以及Vb常用的
ocx
控件合集
这是使用VB 设计的注册ActiveX控件软件, 包含VB 调用系统命令的使用, 并使用了VB获取系统
路径
, 调用API函数, 复制
文件
等高级功能。 本资源还包含了一些VB常用的ActiveX控件, 如
Flash
8.
ocx
, comctl32.
ocx
, mci32.
ocx
,...
网管教程 从入门到精通软件篇.txt
除非您访问驱动器有
问题
,否则不要继续进行。向系统分区写入新的主引导记录可能破坏分区表并导致分区无法访问。 format 将指定的驱动器格式化为指定的
文件
系统。含有下列参数的 format 命令仅在使用故障恢复...
计算机应用技术(实用手册)
解决方法:打开机箱,把主板上的一节纽扣电池取出,换上一节新的既可,或是CMOS被放电了,从新进入CMOS设置时间保存并退出就可解决此
问题
。 Press F1 tocontinue ,DEL to enter SETUP 按F1可以继续启动,按DEL进入...
asp.net知识库
帮助解决网页和JS
文件
中的中文编码
问题
的小工具 慎用const关键字 装箱,拆箱以及反射 动态调用对象的属性和方法——性能和灵活性兼备的方法 消除由try/catch语句带来的warning 微软的应试题完整版(附答案) 一个...
Delphi
5,386
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章