一.播放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。
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器