WTL8.0 调用 ActiveX 控件 - (调用 Flash 控件，响应 Flash 控件的事件)
2008-02-02 16:19
465 查看
WTL8.0 调用 ActiveX 控件
/article/5976278.html
很久没用WTL了，WTL都升级到8.0了，这两天做了个小例子，WTL调用Flash控件。
目标：使用WTL创建对话框的工程，调用Flash控件播放Flash，并响应Flash控件的事件。
环境：WindowsXP, VC++ 2005, WTL8.0, Flash9
1. 首先用WTL Wizard创建对话框工程，如图：
注意要选中 Enable ActiveX Control Hosting，我习惯于 Generate .CPP Files 这样可以使H文件和CPP文件分开。
工程创建好后，Wizard会为我们在 tWinMain 函数中添加 AtlAxWinInit() 函数，如下：
int WINAPI _tWinMain(HINSTANCE hInstance, HINSTANCE /**//*hPrevInstance*/, LPTSTR lpstrCmdLine, int nCmdShow)
{
HRESULT hRes = ::CoInitialize(NULL);
// If you are running on NT 4.0 or higher you can use the following call instead to
// make the EXE free threaded. This means that calls come in on a random RPC thread.
// HRESULT hRes = ::CoInitializeEx(NULL, COINIT_MULTITHREADED);
ATLASSERT(SUCCEEDED(hRes));
// this resolves ATL window thunking problem when Microsoft Layer for Unicode (MSLU) is used
::DefWindowProc(NULL, 0, 0, 0L);
AtlInitCommonControls(ICC_BAR_CLASSES); // add flags to support other controls
hRes = _Module.Init(NULL, hInstance);
ATLASSERT(SUCCEEDED(hRes));
AtlAxWinInit();
int nRet = Run(lpstrCmdLine, nCmdShow);
_Module.Term();
::CoUninitialize();
return nRet;
}
2. 接着在编辑对话框资源，单击右键添加ActiveX控件，这里选择 ShockwaveFlash 1.0控件。如图：
添加好以后，我们需要为这个控件定义一个变量，以便使用控件的方法。我们在CMainDlg类里手工增加ActiveX控件的窗口变量：CAxWindow m_wndFlashPlayer。我们还需要增加ActiveX控件对象的COM接口 CComPtr<IShockwaveFlash> m_FlashPtr，为了增加这个接口，我们需要导入Flash的控件类型库，在 stdafx.h文件中增加如下行：
到此，我们可以编译一下工程，如果没有意外，程序可以正常运行，点击Play按钮，可以播放Flash文件。
4. 下面我们关注如何响应Flash的事件，我们以FSCommand事件为例。
首先编辑对话框资源，右键单击前面添加的Flash控件，选择Add Event Handler，如图：
我们选择添加FSCommand事件的响应处理，响应函数为OnFSCommand，响应的处理放在CMainDlg类中，如图：
添加好后，Wizard会为我们生成事件响应的代码，主要在CMainDlg类中，我们看代码：
#import "c:/windows/system32/flash9c.ocx" raw_interfaces_only, raw_native_types, no_namespace, named_guids
raw_interfaces_only 表示以原始接口方式调用Flash类型库里的方法。
no_namespace 表示没有名字空间。
named_guids 表示生成命名的guid变量，如DIID__IShockwaveFlashEvents等变量。
3. 在对话框的初始化函数 OnInitDialog 里将ActiveX控件与变量绑定，如下：
m_wndFlashPlayer = GetDlgItem(IDC_SHOCKWAVEFLASH1);
// HRESULT hResult = m_wndFlashPlayer.QueryControl(__uuidof(IShockwaveFlash), reinterpret_cast<void**>(&m_FlashPtr));
HRESULT hResult = m_wndFlashPlayer.QueryControl(&m_FlashPtr);
ATLASSERT(hResult == S_OK);
IDC_SHOCKWAVEFLASH1 是ActiveX控件的资源ID, GetDlgItem 根据资源 ID 得到ActiveX控件的窗口对象，然后窗口对象 m_wndFlashPlayer 使用QueryControl方法得到ActiveX控件的COM对象指针。上面代码中，注释掉的方法也是可用的，但没有注释的使用比较简单。
接着装载一个Flash Movie，调用下面的方法，装载一个swf文件，并让它处于停止状态：
hResult = m_FlashPtr->put_Movie(_bstr_t("f://flashC.swf"));
ATLASSERT(hResult == S_OK);
hResult = m_FlashPtr->Stop();
ATLASSERT(hResult == S_OK);
这时候，我们可以在对话框上增加一个按钮，在Click事件里添加播放的代码，如下：
LRESULT CMainDlg::OnBnPlayClicked(WORD /**//*wNotifyCode*/, WORD /**//*wID*/, HWND /**//*hWndCtl*/, BOOL& /**//*bHandled*/)
{
HRESULT hResult = m_FlashPtr->Play();
ATLASSERT(hResult == S_OK);
return 0;
}
// MainDlg.h : interface of the CMainDlg class
//
/////////////////////////////////////////////////////////////////////////////
#pragma once
class CMainDlg : public CAxDialogImpl<CMainDlg>, public CUpdateUI<CMainDlg>,
public CMessageFilter, public CIdleHandler,
public IDispEventImpl<IDC_SHOCKWAVEFLASH1,CMainDlg>
{
public:
enum { IDD = IDD_MAINDLG };
virtual BOOL PreTranslateMessage(MSG* pMsg);
virtual BOOL OnIdle();
BEGIN_UPDATE_UI_MAP(CMainDlg)
END_UPDATE_UI_MAP()
BEGIN_MSG_MAP(CMainDlg)
MESSAGE_HANDLER(WM_INITDIALOG, OnInitDialog)
MESSAGE_HANDLER(WM_DESTROY, OnDestroy)
COMMAND_ID_HANDLER(ID_APP_ABOUT, OnAppAbout)
COMMAND_ID_HANDLER(IDOK, OnOK)
COMMAND_ID_HANDLER(IDCANCEL, OnCancel)
END_MSG_MAP()
// Handler prototypes (uncomment arguments if needed):
// LRESULT MessageHandler(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/)
// LRESULT CommandHandler(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/)
// LRESULT NotifyHandler(int /*idCtrl*/, LPNMHDR /*pnmh*/, BOOL& /*bHandled*/)
LRESULT OnInitDialog(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/);
LRESULT OnDestroy(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/);
LRESULT OnAppAbout(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
LRESULT OnOK(WORD /*wNotifyCode*/, WORD wID, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
LRESULT OnCancel(WORD /*wNotifyCode*/, WORD wID, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
void CloseDialog(int nVal);
public:
CAxWindow m_wndFlashPlayer;
CComPtr<IShockwaveFlash> m_FlashPtr;
BEGIN_SINK_MAP(CMainDlg)
SINK_ENTRY(IDC_SHOCKWAVEFLASH1, 150, OnFSCommand)
END_SINK_MAP()
void __stdcall OnFSCommand(BSTR command, BSTR args);
};
红色部分的代码是Wizard为我们生成的，注意如下几点：
（1）CMainDlg增加了父类 IDispEventImpl<IDC_SHOCKWAVEFLASH1, CMainDlg>, 其中IDC_SHOCKWAVEFLASH1是ActiveX控件的资源ID。
（2）增加了BEGIN_SINK_MAP（事件接受器映射），SINK_ENTRY(IDC_SHOCKWAVEFLASH1, 150, OnFSCommand)是事件接收的进入点，IDC_SHOKEWAVEFLASH1是控件的资源ID，通常这里定义的是事件源的ID，需要和继承的IDispEventImpl模版的第一个参数一致，表示同一个事件源。150 是Flash控件的FSCommand事件的ID，这是固定的，在Flash控件的idl文件已经写死了，我们可以用 OleView 工具察看 Flash 的事件接口里的方法 FSCommand 的ID, 0x96 即为 150。OnFSCommand是我们前面数据的事件响应的函数名，Wizard也为我们生成了函数的声明和框架，void __stdcall OnFSCommand(BSTR command, BSTR args)。
我们在该函数里添加我们的处理代码。
是否这样就可以了吗？答案是否定的，虽然程序编译没有问题，但事件的响应没有触发，我们忘了 DispEventAdvice 了。在 CMainDlg 的初始化函数 OnInitDialog 里加入：DispEventAdvice，如下：
LRESULT CMainDlg::OnInitDialog(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/)
{
// center the dialog on the screen
CenterWindow();
// set icons
HICON hIcon = (HICON)::LoadImage(_Module.GetResourceInstance(), MAKEINTRESOURCE(IDR_MAINFRAME),
IMAGE_ICON, ::GetSystemMetrics(SM_CXICON), ::GetSystemMetrics(SM_CYICON), LR_DEFAULTCOLOR);
SetIcon(hIcon, TRUE);
HICON hIconSmall = (HICON)::LoadImage(_Module.GetResourceInstance(), MAKEINTRESOURCE(IDR_MAINFRAME),
IMAGE_ICON, ::GetSystemMetrics(SM_CXSMICON), ::GetSystemMetrics(SM_CYSMICON), LR_DEFAULTCOLOR);
SetIcon(hIconSmall, FALSE);
// register object for message filtering and idle updates
CMessageLoop* pLoop = _Module.GetMessageLoop();
ATLASSERT(pLoop != NULL);
pLoop->AddMessageFilter(this);
pLoop->AddIdleHandler(this);
UIAddChildWindowContainer(m_hWnd);
m_wndFlashPlayer= GetDlgItem(IDC_SHOCKWAVEFLASH1);
// HRESULT hResult = m_wndFlashPlayer.QueryControl(__uuidof(IShockwaveFlash), reinterpret_cast<void**>(&m_FlashPtr));
HRESULT hResult = m_wndFlashPlayer.QueryControl(&m_FlashPtr);
ATLASSERT(hResult == S_OK);
// AtlAdviseSinkMap(this, true);
DispEventAdvise(m_FlashPtr);
hResult = m_FlashPtr->put_Movie(_bstr_t("f://flashC.swf"));
ATLASSERT(hResult == S_OK);
hResult = m_FlashPtr->Stop();
ATLASSERT(hResult == S_OK);
return TRUE;
}
注释掉的代码 AtlAdviseSinkMap(this, true)也是可以用的。
到此，我们的目标算是实现了。
WTL8.0对 ActiveX的调用可算是比较简单的，回顾一下之前的做法，特别是接受事件的代码，相对还是比较不同的。不过原理都一样。
之前，事件接受的类要继承 IDispEventImpl<SOURCEID,CMainDlg,&DIID__IShockwaveFlashEvents,&LIBID_ShockwaveFlashObjects,1,0>
如下：
// MainDlg.h : interface of the CMainDlg class
//
/////////////////////////////////////////////////////////////////////////////
#pragma once
#define SOURCEID 1
class CMainDlg;
typedef IDispEventImpl<SOURCEID,CMainDlg,&DIID__IShockwaveFlashEvents,&LIBID_ShockwaveFlashObjects,1,0> CFlashEventSink;
class CMainDlg :
public CAxDialogImpl<CMainDlg>,
public CUpdateUI<CMainDlg>,
public CMessageFilter, public CIdleHandler,
public CComObjectRoot,
public CFlashEventSink
{
public:
enum { IDD = IDD_MAINDLG };
virtual BOOL PreTranslateMessage(MSG* pMsg);
virtual BOOL OnIdle();
BEGIN_UPDATE_UI_MAP(CMainDlg)
END_UPDATE_UI_MAP()
BEGIN_MSG_MAP(CMainDlg)
MESSAGE_HANDLER(WM_INITDIALOG, OnInitDialog)
MESSAGE_HANDLER(WM_DESTROY, OnDestroy)
COMMAND_ID_HANDLER(ID_APP_ABOUT, OnAppAbout)
COMMAND_ID_HANDLER(IDOK, OnOK)
COMMAND_ID_HANDLER(IDCANCEL, OnCancel)
COMMAND_HANDLER(IDC_BUTTON1, BN_CLICKED, OnBnClickedButton1)
END_MSG_MAP()
// Handler prototypes (uncomment arguments if needed):
// LRESULT MessageHandler(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/)
// LRESULT CommandHandler(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/)
// LRESULT NotifyHandler(int /*idCtrl*/, LPNMHDR /*pnmh*/, BOOL& /*bHandled*/)
LRESULT OnInitDialog(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/);
LRESULT OnDestroy(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/);
LRESULT OnAppAbout(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
LRESULT OnOK(WORD /*wNotifyCode*/, WORD wID, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
LRESULT OnCancel(WORD /*wNotifyCode*/, WORD wID, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
void CloseDialog(int nVal);
LRESULT OnBnClickedButton1(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
public:
CAxWindow m_wndFlashPlayer;
CComPtr<IShockwaveFlash> m_FlashPtr;
BEGIN_SINK_MAP(CMainDlg)
SINK_ENTRY_EX(SOURCEID, DIID__IShockwaveFlashEvents, 150, OnFSCommand)
END_SINK_MAP()
void __stdcall OnFSCommand(BSTR command, BSTR args);
};
在ATL3.0时，还需要增加COM的映射宏。
BEGIN_COM_MAP(CMainDlg)
END_COM_MAP()
更早些的方法，SINK_MAP 使用 SINK_ENTRY_INFO 的方式映射事件接受函数
BEGIN_SINK_MAP(CMainDlg)
SINK_ENTRY_INFO(SOURCEID, DIID__IShockwaveFlashEvents, 150, OnFSCommand, &FSCommandInfo)
END_SINK_MAP()
其中 FSCommandInfo 的定义如下：
__declspec(selectany) _ATL_FUNC_INFO FSCommandInfo =
{ CC_STDCALL, VT_EMPTY, 2, { VT_BSTR, VT_BSTR } };
这样 CMainDlg 需要这样派生：
class CMainDlg : public CAxDialogImpl<CMainDlg>, public CUpdateUI<CMainDlg>,
public CMessageFilter, public CIdleHandler,
public CComObjectRootEx<CComSingleThreadModel>,
public CComCoClass<CMainDlg>,
public IDispEventSimpleImpl<SOURCEID, CMainDlg, &DIID__IShockwaveFlashEvents>
最后说说事件的订阅的方法：
有这么几种：
1. 写一个Sink类，继承 IDispEventImpl，如下：
#pragma once
#define DISPID_ONSTARTADD 1
#define DISPID_ONSTOPADD 2
#define SOURCEID 1
class CTestSink;
typedef IDispEventImpl<SOURCEID,CTestSink,&DIID__ITestOBJEvents,&LIBID_TestCOMLib,1,0> CTestEventSink;
//typedef IDispatchImpl<_ITestOBJEvents, &__uuidof(_ITestOBJEvents), &LIBID_TestCOMLib, /* wMajor = */ 1, /* wMinor = */ 0> CEventSink;
class ATL_NO_VTABLE CTestSink :
public CComObjectRoot,
public CTestEventSink
{
public:
CTestSink(void);
~CTestSink(void);
BEGIN_COM_MAP(CTestSink)
END_COM_MAP()
BEGIN_SINK_MAP(CTestSink)
SINK_ENTRY_EX(SOURCEID,DIID__ITestOBJEvents,DISPID_ONSTARTADD,OnStartAdd)
SINK_ENTRY_EX(SOURCEID,DIID__ITestOBJEvents,DISPID_ONSTOPADD,OnStopAdd)
END_SINK_MAP()
void __stdcall OnStartAdd();
void __stdcall OnStopAdd(LONG result);
};
事件的订阅可以使用如下代码：
ITestOBJPtr m_TestOBJPtr;
HRESULT hResult = m_TestOBJPtr.CreateInstance("TestCOM.TestOBJ");
CTestSink * m_pSink = NULL;
m_pSink = new CComObject<CTestSink>;
m_pSink->AddRef();
m_pSink->DispEventAdvise(m_TestOBJPtr);
// hResult = AtlAdvise(m_TestOBJPtr, (IUnknown *)m_pSink, DIID__ITestOBJEvents, &m_dwCookie);
上面注释的代码也是可以使用的。在最开始的例子里，还有比较简单的事件订阅的方法：
AtlAdviseSinkMap(this, true);
最后记住在合适的时候取消事件订阅：DispEventUnadvise 或者 AtlUnadvise 或者 AtlAdviseSinkMap(this, false)。
以上简单总结了 WTL 使用 ActiveX 控件的相关方法，欢迎拍砖，:-P
/article/5976278.html
很久没用WTL了，WTL都升级到8.0了，这两天做了个小例子，WTL调用Flash控件。
目标：使用WTL创建对话框的工程，调用Flash控件播放Flash，并响应Flash控件的事件。
环境：WindowsXP, VC++ 2005, WTL8.0, Flash9
1. 首先用WTL Wizard创建对话框工程，如图：
注意要选中 Enable ActiveX Control Hosting，我习惯于 Generate .CPP Files 这样可以使H文件和CPP文件分开。
工程创建好后，Wizard会为我们在 tWinMain 函数中添加 AtlAxWinInit() 函数，如下：
int WINAPI _tWinMain(HINSTANCE hInstance, HINSTANCE /**//*hPrevInstance*/, LPTSTR lpstrCmdLine, int nCmdShow)
{
HRESULT hRes = ::CoInitialize(NULL);
// If you are running on NT 4.0 or higher you can use the following call instead to
// make the EXE free threaded. This means that calls come in on a random RPC thread.
// HRESULT hRes = ::CoInitializeEx(NULL, COINIT_MULTITHREADED);
ATLASSERT(SUCCEEDED(hRes));
// this resolves ATL window thunking problem when Microsoft Layer for Unicode (MSLU) is used
::DefWindowProc(NULL, 0, 0, 0L);
AtlInitCommonControls(ICC_BAR_CLASSES); // add flags to support other controls
hRes = _Module.Init(NULL, hInstance);
ATLASSERT(SUCCEEDED(hRes));
AtlAxWinInit();
int nRet = Run(lpstrCmdLine, nCmdShow);
_Module.Term();
::CoUninitialize();
return nRet;
}
2. 接着在编辑对话框资源，单击右键添加ActiveX控件，这里选择 ShockwaveFlash 1.0控件。如图：
添加好以后，我们需要为这个控件定义一个变量，以便使用控件的方法。我们在CMainDlg类里手工增加ActiveX控件的窗口变量：CAxWindow m_wndFlashPlayer。我们还需要增加ActiveX控件对象的COM接口 CComPtr<IShockwaveFlash> m_FlashPtr，为了增加这个接口，我们需要导入Flash的控件类型库，在 stdafx.h文件中增加如下行：
到此，我们可以编译一下工程，如果没有意外，程序可以正常运行，点击Play按钮，可以播放Flash文件。
4. 下面我们关注如何响应Flash的事件，我们以FSCommand事件为例。
首先编辑对话框资源，右键单击前面添加的Flash控件，选择Add Event Handler，如图：
我们选择添加FSCommand事件的响应处理，响应函数为OnFSCommand，响应的处理放在CMainDlg类中，如图：
添加好后，Wizard会为我们生成事件响应的代码，主要在CMainDlg类中，我们看代码：
#import "c:/windows/system32/flash9c.ocx" raw_interfaces_only, raw_native_types, no_namespace, named_guids
raw_interfaces_only 表示以原始接口方式调用Flash类型库里的方法。
no_namespace 表示没有名字空间。
named_guids 表示生成命名的guid变量，如DIID__IShockwaveFlashEvents等变量。
3. 在对话框的初始化函数 OnInitDialog 里将ActiveX控件与变量绑定，如下：
m_wndFlashPlayer = GetDlgItem(IDC_SHOCKWAVEFLASH1);
// HRESULT hResult = m_wndFlashPlayer.QueryControl(__uuidof(IShockwaveFlash), reinterpret_cast<void**>(&m_FlashPtr));
HRESULT hResult = m_wndFlashPlayer.QueryControl(&m_FlashPtr);
ATLASSERT(hResult == S_OK);
IDC_SHOCKWAVEFLASH1 是ActiveX控件的资源ID, GetDlgItem 根据资源 ID 得到ActiveX控件的窗口对象，然后窗口对象 m_wndFlashPlayer 使用QueryControl方法得到ActiveX控件的COM对象指针。上面代码中，注释掉的方法也是可用的，但没有注释的使用比较简单。
接着装载一个Flash Movie，调用下面的方法，装载一个swf文件，并让它处于停止状态：
hResult = m_FlashPtr->put_Movie(_bstr_t("f://flashC.swf"));
ATLASSERT(hResult == S_OK);
hResult = m_FlashPtr->Stop();
ATLASSERT(hResult == S_OK);
这时候，我们可以在对话框上增加一个按钮，在Click事件里添加播放的代码，如下：
LRESULT CMainDlg::OnBnPlayClicked(WORD /**//*wNotifyCode*/, WORD /**//*wID*/, HWND /**//*hWndCtl*/, BOOL& /**//*bHandled*/)
{
HRESULT hResult = m_FlashPtr->Play();
ATLASSERT(hResult == S_OK);
return 0;
}
// MainDlg.h : interface of the CMainDlg class
//
/////////////////////////////////////////////////////////////////////////////
#pragma once
class CMainDlg : public CAxDialogImpl<CMainDlg>, public CUpdateUI<CMainDlg>,
public CMessageFilter, public CIdleHandler,
public IDispEventImpl<IDC_SHOCKWAVEFLASH1,CMainDlg>
{
public:
enum { IDD = IDD_MAINDLG };
virtual BOOL PreTranslateMessage(MSG* pMsg);
virtual BOOL OnIdle();
BEGIN_UPDATE_UI_MAP(CMainDlg)
END_UPDATE_UI_MAP()
BEGIN_MSG_MAP(CMainDlg)
MESSAGE_HANDLER(WM_INITDIALOG, OnInitDialog)
MESSAGE_HANDLER(WM_DESTROY, OnDestroy)
COMMAND_ID_HANDLER(ID_APP_ABOUT, OnAppAbout)
COMMAND_ID_HANDLER(IDOK, OnOK)
COMMAND_ID_HANDLER(IDCANCEL, OnCancel)
END_MSG_MAP()
// Handler prototypes (uncomment arguments if needed):
// LRESULT MessageHandler(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/)
// LRESULT CommandHandler(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/)
// LRESULT NotifyHandler(int /*idCtrl*/, LPNMHDR /*pnmh*/, BOOL& /*bHandled*/)
LRESULT OnInitDialog(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/);
LRESULT OnDestroy(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/);
LRESULT OnAppAbout(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
LRESULT OnOK(WORD /*wNotifyCode*/, WORD wID, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
LRESULT OnCancel(WORD /*wNotifyCode*/, WORD wID, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
void CloseDialog(int nVal);
public:
CAxWindow m_wndFlashPlayer;
CComPtr<IShockwaveFlash> m_FlashPtr;
BEGIN_SINK_MAP(CMainDlg)
SINK_ENTRY(IDC_SHOCKWAVEFLASH1, 150, OnFSCommand)
END_SINK_MAP()
void __stdcall OnFSCommand(BSTR command, BSTR args);
};
红色部分的代码是Wizard为我们生成的，注意如下几点：
（1）CMainDlg增加了父类 IDispEventImpl<IDC_SHOCKWAVEFLASH1, CMainDlg>, 其中IDC_SHOCKWAVEFLASH1是ActiveX控件的资源ID。
（2）增加了BEGIN_SINK_MAP（事件接受器映射），SINK_ENTRY(IDC_SHOCKWAVEFLASH1, 150, OnFSCommand)是事件接收的进入点，IDC_SHOKEWAVEFLASH1是控件的资源ID，通常这里定义的是事件源的ID，需要和继承的IDispEventImpl模版的第一个参数一致，表示同一个事件源。150 是Flash控件的FSCommand事件的ID，这是固定的，在Flash控件的idl文件已经写死了，我们可以用 OleView 工具察看 Flash 的事件接口里的方法 FSCommand 的ID, 0x96 即为 150。OnFSCommand是我们前面数据的事件响应的函数名，Wizard也为我们生成了函数的声明和框架，void __stdcall OnFSCommand(BSTR command, BSTR args)。
我们在该函数里添加我们的处理代码。
是否这样就可以了吗？答案是否定的，虽然程序编译没有问题，但事件的响应没有触发，我们忘了 DispEventAdvice 了。在 CMainDlg 的初始化函数 OnInitDialog 里加入：DispEventAdvice，如下：
LRESULT CMainDlg::OnInitDialog(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/)
{
// center the dialog on the screen
CenterWindow();
// set icons
HICON hIcon = (HICON)::LoadImage(_Module.GetResourceInstance(), MAKEINTRESOURCE(IDR_MAINFRAME),
IMAGE_ICON, ::GetSystemMetrics(SM_CXICON), ::GetSystemMetrics(SM_CYICON), LR_DEFAULTCOLOR);
SetIcon(hIcon, TRUE);
HICON hIconSmall = (HICON)::LoadImage(_Module.GetResourceInstance(), MAKEINTRESOURCE(IDR_MAINFRAME),
IMAGE_ICON, ::GetSystemMetrics(SM_CXSMICON), ::GetSystemMetrics(SM_CYSMICON), LR_DEFAULTCOLOR);
SetIcon(hIconSmall, FALSE);
// register object for message filtering and idle updates
CMessageLoop* pLoop = _Module.GetMessageLoop();
ATLASSERT(pLoop != NULL);
pLoop->AddMessageFilter(this);
pLoop->AddIdleHandler(this);
UIAddChildWindowContainer(m_hWnd);
m_wndFlashPlayer= GetDlgItem(IDC_SHOCKWAVEFLASH1);
// HRESULT hResult = m_wndFlashPlayer.QueryControl(__uuidof(IShockwaveFlash), reinterpret_cast<void**>(&m_FlashPtr));
HRESULT hResult = m_wndFlashPlayer.QueryControl(&m_FlashPtr);
ATLASSERT(hResult == S_OK);
// AtlAdviseSinkMap(this, true);
DispEventAdvise(m_FlashPtr);
hResult = m_FlashPtr->put_Movie(_bstr_t("f://flashC.swf"));
ATLASSERT(hResult == S_OK);
hResult = m_FlashPtr->Stop();
ATLASSERT(hResult == S_OK);
return TRUE;
}
注释掉的代码 AtlAdviseSinkMap(this, true)也是可以用的。
到此，我们的目标算是实现了。
WTL8.0对 ActiveX的调用可算是比较简单的，回顾一下之前的做法，特别是接受事件的代码，相对还是比较不同的。不过原理都一样。
之前，事件接受的类要继承 IDispEventImpl<SOURCEID,CMainDlg,&DIID__IShockwaveFlashEvents,&LIBID_ShockwaveFlashObjects,1,0>
如下：
// MainDlg.h : interface of the CMainDlg class
//
/////////////////////////////////////////////////////////////////////////////
#pragma once
#define SOURCEID 1
class CMainDlg;
typedef IDispEventImpl<SOURCEID,CMainDlg,&DIID__IShockwaveFlashEvents,&LIBID_ShockwaveFlashObjects,1,0> CFlashEventSink;
class CMainDlg :
public CAxDialogImpl<CMainDlg>,
public CUpdateUI<CMainDlg>,
public CMessageFilter, public CIdleHandler,
public CComObjectRoot,
public CFlashEventSink
{
public:
enum { IDD = IDD_MAINDLG };
virtual BOOL PreTranslateMessage(MSG* pMsg);
virtual BOOL OnIdle();
BEGIN_UPDATE_UI_MAP(CMainDlg)
END_UPDATE_UI_MAP()
BEGIN_MSG_MAP(CMainDlg)
MESSAGE_HANDLER(WM_INITDIALOG, OnInitDialog)
MESSAGE_HANDLER(WM_DESTROY, OnDestroy)
COMMAND_ID_HANDLER(ID_APP_ABOUT, OnAppAbout)
COMMAND_ID_HANDLER(IDOK, OnOK)
COMMAND_ID_HANDLER(IDCANCEL, OnCancel)
COMMAND_HANDLER(IDC_BUTTON1, BN_CLICKED, OnBnClickedButton1)
END_MSG_MAP()
// Handler prototypes (uncomment arguments if needed):
// LRESULT MessageHandler(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/)
// LRESULT CommandHandler(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/)
// LRESULT NotifyHandler(int /*idCtrl*/, LPNMHDR /*pnmh*/, BOOL& /*bHandled*/)
LRESULT OnInitDialog(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/);
LRESULT OnDestroy(UINT /*uMsg*/, WPARAM /*wParam*/, LPARAM /*lParam*/, BOOL& /*bHandled*/);
LRESULT OnAppAbout(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
LRESULT OnOK(WORD /*wNotifyCode*/, WORD wID, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
LRESULT OnCancel(WORD /*wNotifyCode*/, WORD wID, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
void CloseDialog(int nVal);
LRESULT OnBnClickedButton1(WORD /*wNotifyCode*/, WORD /*wID*/, HWND /*hWndCtl*/, BOOL& /*bHandled*/);
public:
CAxWindow m_wndFlashPlayer;
CComPtr<IShockwaveFlash> m_FlashPtr;
BEGIN_SINK_MAP(CMainDlg)
SINK_ENTRY_EX(SOURCEID, DIID__IShockwaveFlashEvents, 150, OnFSCommand)
END_SINK_MAP()
void __stdcall OnFSCommand(BSTR command, BSTR args);
};
在ATL3.0时，还需要增加COM的映射宏。
BEGIN_COM_MAP(CMainDlg)
END_COM_MAP()
更早些的方法，SINK_MAP 使用 SINK_ENTRY_INFO 的方式映射事件接受函数
BEGIN_SINK_MAP(CMainDlg)
SINK_ENTRY_INFO(SOURCEID, DIID__IShockwaveFlashEvents, 150, OnFSCommand, &FSCommandInfo)
END_SINK_MAP()
其中 FSCommandInfo 的定义如下：
__declspec(selectany) _ATL_FUNC_INFO FSCommandInfo =
{ CC_STDCALL, VT_EMPTY, 2, { VT_BSTR, VT_BSTR } };
这样 CMainDlg 需要这样派生：
class CMainDlg : public CAxDialogImpl<CMainDlg>, public CUpdateUI<CMainDlg>,
public CMessageFilter, public CIdleHandler,
public CComObjectRootEx<CComSingleThreadModel>,
public CComCoClass<CMainDlg>,
public IDispEventSimpleImpl<SOURCEID, CMainDlg, &DIID__IShockwaveFlashEvents>
最后说说事件的订阅的方法：
有这么几种：
1. 写一个Sink类，继承 IDispEventImpl，如下：
#pragma once
#define DISPID_ONSTARTADD 1
#define DISPID_ONSTOPADD 2
#define SOURCEID 1
class CTestSink;
typedef IDispEventImpl<SOURCEID,CTestSink,&DIID__ITestOBJEvents,&LIBID_TestCOMLib,1,0> CTestEventSink;
//typedef IDispatchImpl<_ITestOBJEvents, &__uuidof(_ITestOBJEvents), &LIBID_TestCOMLib, /* wMajor = */ 1, /* wMinor = */ 0> CEventSink;
class ATL_NO_VTABLE CTestSink :
public CComObjectRoot,
public CTestEventSink
{
public:
CTestSink(void);
~CTestSink(void);
BEGIN_COM_MAP(CTestSink)
END_COM_MAP()
BEGIN_SINK_MAP(CTestSink)
SINK_ENTRY_EX(SOURCEID,DIID__ITestOBJEvents,DISPID_ONSTARTADD,OnStartAdd)
SINK_ENTRY_EX(SOURCEID,DIID__ITestOBJEvents,DISPID_ONSTOPADD,OnStopAdd)
END_SINK_MAP()
void __stdcall OnStartAdd();
void __stdcall OnStopAdd(LONG result);
};
事件的订阅可以使用如下代码：
ITestOBJPtr m_TestOBJPtr;
HRESULT hResult = m_TestOBJPtr.CreateInstance("TestCOM.TestOBJ");
CTestSink * m_pSink = NULL;
m_pSink = new CComObject<CTestSink>;
m_pSink->AddRef();
m_pSink->DispEventAdvise(m_TestOBJPtr);
// hResult = AtlAdvise(m_TestOBJPtr, (IUnknown *)m_pSink, DIID__ITestOBJEvents, &m_dwCookie);
上面注释的代码也是可以使用的。在最开始的例子里，还有比较简单的事件订阅的方法：
AtlAdviseSinkMap(this, true);
最后记住在合适的时候取消事件订阅：DispEventUnadvise 或者 AtlUnadvise 或者 AtlAdviseSinkMap(this, false)。
以上简单总结了 WTL 使用 ActiveX 控件的相关方法，欢迎拍砖，:-P
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- WTL8.0 调用 ActiveX 控件 - (调用 Flash 控件，响应 Flash 控件的事件)
- WTL8.0 调用 ActiveX 控件 - (调用 Flash 控件，响应 Flash 控件的事件)
- WTL8.0 调用 ActiveX 控件 - (调用 Flash 控件，响应 Flash 控件的事件)
- WTL8.0 调用 ActiveX 控件 - (调用 Flash 控件，响应 Flash 控件的事件)
- WTL8.0 调用 ActiveX 控件
- js 阻止冒泡 在控件的 onxxx 事件中调用就可以阻止父控件也响应消息了
- ActiveX之控件关联变量、调用事件
- 演示改变客户端控件事件响应脚本及无刷新调用服务端（ASP.net2.0）
- 页面调用OCX(ActiveX)控件,自动下载、注册及 javascript对ActiveX的访问、控制和事件调用等。
- 扩展GridView控件(6) - 响应行的单击事件和双击事件
- 【转】wxPython控件学习之TextCtrl（三）响应文本控件事件
- js调用.net后台事件，和后台调用前台等方法以及js调用服务器控件的方法
- 页面上调用用户控件的事件
- C#通过事件跨类调用WPF主窗口中的控件
- 为什么在RichEdit控件里插入ActiveX控件，该ActiveX控件不能响应事件？
- 上接扩展GridView控件(6) - 响应行的单击事件和双击事件
- 让某些服务器控件触发事件时,先调用js函数,在调用后台函数代码
- 键盘return事件的响应，以及tableViewCell中控件的父视图(superView)
- iOS-控件响应用户控制事件之事件处理
- 用户控件使用事件与调用页面交互