请问在delphi中怎么去调用flash文件进行播放?
解决方案 »
- delphi如何访问Internet上的Oracle数据库
- 在DateTimePicker输入日期时(不用鼠标),能不能这样,输好年份,光标自动跳到月份,同样月份输好,光标自动跳到日!
- 请问哪位兄弟是无线上网的?我想请你帮个忙好吗?
- 删除重复的字符串行
- 怎么将int类型转换成chr类型???
- winsock 流量怎么控制(解决了送 100分)
- toolbar中的按钮一般是横排的
- 谁有<<delphi深度探索>>陈省著的配套光碟程序?高分
- sql查询语句的参数问题
- 我有个文本文件,有4个G那么大,请问有什么工具可以快速删除!!!!!!!!!!
- 怎样让我的程序开机后自动运行(最好有代码)
- 求够三层结构开发的源代码
--install……编译project
就可以用activex控件tshockwaveflash 播放flash
\ 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。