Question

Delphi的两个实用技巧(1)播放Flash

Answer 1

　　一 播放Flash　　首先 你的机器里要装有Flash播放软件（你的IE能显示Flash） IE之所以能显示Flash是安装了由Macromedia公司提供的swflash ocx控件 我们可以在Win 的$Windows\System\Macromed \Flash中或在Win 中的$Winnt\System \ Macromed\Flash中找到它 ActiveX控件在Windows里是通用的 Delphi也同样支持 　　运行Delphi后 选择选单Component→Import ActiveX Control 找到SWFlash OCX 文件进行安装 安装完成后 ActiveX面板里出现TShockwaveFlash控件 这是Delphi对SWFlash OCX的封装 现在我们就可以用这个控件来播放Flash了 拖一个Flash过来 放在Form上 指定其Movie属性为d:\test SWF 并按F 键加以运行即可 怎么样 运行效果不错吧？　　下面 笔者将具体介绍TShockwaveFlash主要属性 方法和事件 以便于读者开发 TShockwaveFlash主要属性如下 ReadyState 读一个Flash文件时的状态 其中包括 =Loading =Uninitialized =Loaded =Interactive和 =Complete TotalFrames 总帧数 只有当ReadyState =

lishixinzhi/Article/program/Delphi/201311/8387