C++ Builder 创建 Flash 控件

C++ Builder 创建 Flash 控件

 

1、通过浏览器安装好FlashPlayer控件

 

2、创建FlashPlayer控件

打开 RAD Studio 2010

a 新建一个Package，取名为 ShockwaveFlash

b 导入FlashPlayer 控件

    RAD Studio 2010 菜单 Component  选择 Import Component，选择 Import ActiveX Control，找到 ShockwaveFlash，选中后“下一步”

    设置好 Unit Dir 用于保存单元文件，和搜索路径(建议为空) ，单击“下一步”

    选择“Add unit to .... project”，Finish

    (控件创建完毕)

 

单击编译显示 LINK32 Error，找到 ShockwaveFlashObjects_OCX.h 文件，分别找到以下8个函数，有两组，共16个，全部在函数定义前面加上inline关键字，再重新编译。

GetDispID、RemoteInvokeEx、DeleteMemberByName、DeleteMemberByDispID、GetMemberProperties、GetMemberName、GetNextDispID、GetNameSpaceParent

这次编译全部通过，Flash控件创建完成。

 

做一个小程序测试一下……经测试，Flash播放正常。

if(OpenDialog1->Execute() == true)
 {
  ShockwaveFlash1->Movie = OpenDialog1->FileName;
  // ShockwaveFlash1->Loop = false;
  ShockwaveFlash1->Play();
  // OpenDialog1->FileName
 }