假设需求如下:底层是一个数学运算库 DLL, 中间是 ActiveX 控件(它调用底层的数学运算库 DLL 来完成控制层),界面层在测试时可以是一个 exe 程序,最后发布到 IE 浏览器上测试。
数学运算库 DLL 的开发
新建一个 Win32 DLL 项目,加入一个头文件 MyNum.h, 在其中声明所有的数学函数(为简单起见,本文只考虑加法运算),代码如下:
#ifndef MY_NUM_H
#define
MY_NUM_H
int
__stdcall AddNum(
int
,
int
);
#endif
请注意这里的方法声明为 __stdcall ,而 VC++ 默认的是 __cdecl ,由于组件的语言无关性要求调用和被调双方必须在函数调用的约定上一致,因此在后面加载 DLL 并获取此方法时也要求和你的声明一致。
为了简单起见,加法方法的实现就放倒 DLL 入口点所在文件 , 代码如下:
//
NumDLL.cpp : 定义DLL 应用程序的入口点。
//
#include
"
stdafx.h
"
#include
"
MyNum.h
"

#ifdef _MANAGED
#pragma
managed(push, off)
#endif

int
__stdcall AddNum(
int
Num1,
int
Num2)
{
return Num1 + Num2;
}
BOOL APIENTRY DllMain( HMODULE hModule,
DWORD ul_reason_for_call,
LPVOID lpReserved
)
{
return TRUE;
}

#ifdef _MANAGED
#pragma
managed(pop)
#endif
为了能在其他程序中显示链接此 DLL ,我们为它加入一个 .def 文件,命名为 NumDLL.def ,列出此 DLL 导出的方法名称:
LIBRARY
"
NumDLL
"
EXPORTS
AddNum
至此我们的数学运算函数库 DLL 就完成了。
用 ATL 开发 ActiveX 控件
开发 ActiveX 控件有两种方式,一是 MFC, 二是 ATL, 而后者是专门用于 COM 组件开发,因此更适合于 ActiveX 。因此这里选择后者,前者的开发示例参考我这篇文章( 用VC++开发 ActiveX 控件完全教程(一) )。
新建一个 ATL 项目,命名为 ”FuckATL” ,接受默认设置。右键项目名,添加一个 ”ATL 简单对象 “ ,命名为 CaluNumCtrl , 点击下一步进入组件选项设置界面。
修改类的头文件 CaluNumCtrl.h 如下:
class
ATL_NO_VTABLE CCaluNumCtrl :
public
CComObjectRootEx
<
CComSingleThreadModel
>
,
public
CComCoClass
<
CCaluNumCtrl,
&
CLSID_CaluNumCtrl
>
,
public
ISupportErrorInfo,
public
IConnectionPointContainerImpl
<
CCaluNumCtrl
>
,
public
CProxy_ICaluNumCtrlEvents
<
CCaluNumCtrl
>
,
public
IObjectWithSiteImpl
<
CCaluNumCtrl
>
,
public
IDispatchImpl
<
ICaluNumCtrl,
&
IID_ICaluNumCtrl,
&
LIBID_FuckATLLib,
/* wMajor = */
1
,
/* wMinor = */
0
>
{
public :
typedef int (__stdcall * PtrAddNum)( int , int );
PtrAddNum MyAddNum;
CCaluNumCtrl()
{
// 加载数学运算库DLL
handle = ::LoadLibrary(_T( " D:\\dyk\\work\\NumDLL\\debug\\NumDLL.dll " ));
if (handle == NULL)
{
DWORD e = GetLastError();
return ;
}
// 获取加法运算函数指针
MyAddNum = (PtrAddNum)GetProcAddress(handle, " AddNum " );
}
DECLARE_REGISTRY_RESOURCEID(IDR_CALUNUMCTRL)
BEGIN_COM_MAP(CCaluNumCtrl)
COM_INTERFACE_ENTRY(ICaluNumCtrl)
COM_INTERFACE_ENTRY(IDispatch)
COM_INTERFACE_ENTRY(ISupportErrorInfo)
COM_INTERFACE_ENTRY(IConnectionPointContainer)
COM_INTERFACE_ENTRY(IObjectWithSite)
END_COM_MAP()

BEGIN_CONNECTION_POINT_MAP(CCaluNumCtrl)
CONNECTION_POINT_ENTRY(__uuidof(_ICaluNumCtrlEvents))
END_CONNECTION_POINT_MAP()
// ISupportsErrorInfo
STDMETHOD(InterfaceSupportsErrorInfo)(REFIID riid);
DECLARE_PROTECT_FINAL_CONSTRUCT()
HRESULT FinalConstruct()
{
return S_OK;
}
void FinalRelease()
{
}
// 组件对外放出的加法方法
public :
STDMETHOD(AddNumbers)(LONG Num1, LONG Num2, LONG * ReturnVal); // 下面是一个NUM属性,也是用于测试,包含了读写设置方法
public :
STDMETHOD(get_NUM)(SHORT * pVal);
public :
STDMETHOD(put_NUM)(SHORT newVal);
public :
HMODULE handle; // 数学函数库模块句柄
}
;
在控件实现文件 CaluNumCtrl.cpp 中,代码如下:
STDMETHODIMP CCaluNumCtrl::AddNumbers(LONG Num1, LONG Num2, LONG
*
ReturnVal)
{
int sum = this -> MyAddNum(static_cast < int > (Num1),static_cast < int > (Num2));
* ReturnVal = static_cast < LONG > (sum);
return S_OK;
}

STDMETHODIMP CCaluNumCtrl::get_NUM(SHORT
*
pVal)
{
* pVal = 10 ;
return S_OK;
}

STDMETHODIMP CCaluNumCtrl::put_NUM(SHORT newVal)
{
// TODO: 在此添加实现代码
return S_OK;
}
好了, ActiveX 控件仅仅是简单地调用底层的数学运算库 DLL 来完成运算,下面我们写一个 exe 程序对这个 COM 组件进行测试。
一个控制台测试程序
建立一个最简单的控制台程序来进行测试,代码如下:
#include
"
..\..\FuckATL\FuckATL\FuckATL.h
"
#include
"
..\..\FuckATL\FuckATL\FuckATL_i.c
"
#include
<
iostream
>
using
namespace
std;

void
main(
void
)
{
// Declare and HRESULT and a pointer to the Simple_ATL interface
HRESULT hr;
ICaluNumCtrl * IFirstATL = NULL;
// Now we will intilize COM
hr = CoInitialize( 0 );
// Use the SUCCEDED macro and see if we can get a pointer to
// the interface
if (SUCCEEDED(hr))
{
hr = CoCreateInstance( CLSID_CaluNumCtrl, NULL, CLSCTX_INPROC_SERVER,
IID_ICaluNumCtrl, ( void ** ) & IFirstATL);
// If we succeeded then call the AddNumbers method, if it failed
// then display an appropriate message to the user.
if (SUCCEEDED(hr))
{
long ReturnValue;
hr = IFirstATL -> AddNumbers( 5 , 7 , & ReturnValue);
cout << " The answer for 5 + 7 is: " << ReturnValue << endl;
short num;
IFirstATL -> get_NUM( & num);
cout << " num is: " << num << endl;
hr = IFirstATL -> Release();
}
else
{
cout << " CoCreateInstance Failed. " << endl;
}
}
// Uninitialize COM
CoUninitialize();
system( " pause " );
}
来到 IE 的世界
最后我们将此 ActiveX 组件嵌入到 html 页面中,对其进行测试 . 新建一个 html 页面,代码如下:
<
HTML
>
<
HEAD
>
<
TITLE
>
New Page
</
TITLE
>
<
script
language
="javascript"
>
function doTest()
{
var sum = FuckATL1.AddNumbers( 3 , 4 );
alert(sum);
}
</
script
>
</
HEAD
>
<
BODY
>
<
OBJECT
ID
="FuckATL1"
CLASSID
="CLSID:7BF3B65F-A800-4604-AE6B-91844EFD5F05"
>
</
OBJECT
>
<
input
type
="button"
value
="测试加法"
id
="btnOK"
onclick
="doTest();"
></
input
>
</
BODY
>
</
HTML
>
由于暂时先不考虑控件的安全性需要,因此会出现下面的警告信息,不过不要紧,这个问题以后再解决。
测试结果如下: