手机站
网通分站
电信主站
密 码:
用户名:
当前位置 : 主页>程序设计>delphi>列表

在Delphi中调用Flash

来源:互联网 作者:西部数码 时间:2008-04-09
西部数码-全国虚拟主机10强!40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!
-----------------------文 老猫

----本文参考了Delphi世界之大富翁论坛上阿蒙和浦青锋两位大侠的
意见。
----原来我并不打算把这种问题放在网上,我以为大家都会知道。后
来好友流云建议说,她们班好多人都学Flash,很想知道如何在Delphi
中调用Flash。我就讲了一下,并顺便把它放在了主页上。
----如果你的计算机已装了Flash,那就非常简单。如果还没装,那么
光在网上下载flash 插件也可以,然后启动你的Delphi,再Component
菜单项选Import ActiveX Control...,接下来在Import ActiveX
Control项就会有Sockwave Flash (版本号)这项出现,选中它再按
Install...按钮。
----现在你的Component面板有ShockwaveFlash控件了吧,它的使用方
法和其他控件没有大的差别,做一个简单示例。
----新建一个Project,在Form上放一个button和一个opendialog 控
件,再放上ShockwaveFlash控件。opendialog 用于打开Flash文件(*.
swf),button的 onclick 事件如下:
begin
----opendialog1.execute;
----swf:=opendialog1.filename;
----shockwaveflash1.Movie:=swf;
----shockwaveflash1.play;
end;
----编译通过,你就可以用按钮打开对话框,选择*.swf文件就可以
了。

文章整理:西部数码--专业提供域名注册虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!