在Delphi中调用Flash

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