在Delphi中调用Flash

王朝delphi·作者佚名  2006-01-08
窄屏简体版  字體: |||超大  

-----------------------文 老猫

----本文参考了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文件就可以

了。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航