VC中调用组件的方法

最新推荐文章于 2024-10-08 13:11:14 发布

大石头1987

最新推荐文章于 2024-10-08 13:11:14 发布

阅读量848

点赞数

分类专栏： win32 编程文章标签： null mfc dll microsoft insert 编译器

win32 编程专栏收录该内容

16 篇文章

订阅专栏

准备及条件：
COM服务器为进程内服务器，DLL名为simpCOM.dll,该组件只有一个接口IFoo,该接口只有一个方法HRESULT SayHello(void)

在SDK中调用
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
一、最简单最常用的一种，用#import导入类型库，利用VC提供的智能指针包装类
演示代码:

#import "D:/Temp/vc/simpCOM/Debug/simpCOM.dll " no_namespace
CoInitialize(NULL);

IFooPtr spFoo = NULL;
spFoo.CreateInstance(__uuidof(Foo));
spFoo-> SayHello();
spFoo.Release();/*晕死了，本来智能指针就是为了让用户不用关心这个的，可是我发现如果不手工调用一下的话，程序退出后会发生内存访问错误，我是在console中做试验的，哪位大侠知道怎么回事请一定指教*/
CoUninitialize();

二、引入midl.exe产生的*.h,*_i.c文件，利用CoCreateInstance函数来调用

演示代码:
/*在工程中加入*_i.c文件，例如本例的simpCOM_i.c,该文件定义了类和接口的guid值，如果不引入的话，会发生连接错误。*/

#include "D:/Temp/vc/simpCOM/simpCOM.h "
CoInitialize(NULL);

IFoo*   pFoo   =   NULL;
HRESULT   hr   =   CoCreateInstance(CLSID_Foo,   NULL,   CLSCTX_ALL,   IID_IFoo,   (void**)&pFoo);
if   (SUCCEEDED(hr)   &&   (pFoo   !=   NULL))
{
pFoo-> SayHello();
pFoo-> Release();
}

CoUninitialize();

三、不用CoCreateInstance，直接用CoGetClassObejct得到类厂对象接口，然后用该接口的方法CreateInstance来生成实例。
演示代码:
/*前期准备如二方法所述*/
IClassFactory*   pcf   =   NULL;
HRESULT hr   =   CoGetClassObject(CLSID_Foo,   CLSCTX_ALL,   NULL,   IID_IClassFactory,   (void**)&pcf);
if   (SUCCEEDED(hr)   &&   (pcf   !=   NULL))
{
IFoo*   pFoo   =   NULL;
hr   =   pcf-> CreateInstance(NULL,   IID_IFoo,   (void**)&pFoo);
if   (SUCCEEDED(hr)     &&   (pFoo   !=   NULL))
{
pFoo-> SayHello();
pFoo-> Release();
}
pcf-> Release();
}

四、不用CoCreateInstance or CoGetClassObject,直接从dll中得到DllGetClassObject，接着生成类对象及类实例（本方法适合于你想用某个组件，却不想在注册表中注册该组件）

演示代码:
/*前期准备工作如二方法所述，事实上只要得到CLSID和IID的定义及接口的定义就行*/

typedef   HRESULT   (__stdcall   *   pfnGCO)   (REFCLSID,   REFIID,   void**);
pfnGCO   fnGCO   =   NULL;
HINSTANCE   hdllInst   =   LoadLibrary( "D://Temp//vc//simpCOM//Debug//simpCOM.dll ");
fnGCO   =   (pfnGCO)GetProcAddress(hdllInst,   "DllGetClassObject ");
if   (fnGCO   !=   0)
{
IClassFactory*   pcf   =   NULL;
HRESULT   hr=(fnGCO)(CLSID_Foo,   IID_IClassFactory,   (void**)&pcf);
if   (SUCCEEDED(hr)   &&   (pcf   !=   NULL))
{
IFoo*   pFoo   =   NULL;
hr   =   pcf-> CreateInstance(NULL,   IID_IFoo,   (void**)&pFoo);
if   (SUCCEEDED(hr)     &&   (pFoo   !=   NULL))
{
pFoo-> SayHello();
pFoo-> Release();
}
pcf-> Release();
}
}
FreeLibrary(hdllInst);

在MFC中调用
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
在MFC中除了上面的几种方法外，还有一种更方便的方法，就是通过ClassWizard利用类型库生成包装类，不过有个前提就是com组件的接口必须是派生自IDispatch

具体方法：
１、按Ctrl+W调出类向导，按Add Class按钮弹出新菜单，选From a type libarary，然后定位到simpCOM.dll，接下来会出来该simpCOM中的所有接口，选择你想生成的接口包装类后，向导会自动生成相应的.cpp和.h文件.
这样你就可以在你的MFC工程中像使用普通类那样使用COM组件了.

演示代码:

CoInitialize(NULL);

IFoo foo;
if (foo.CreateDispatch( "simpCOM.Foo ") != 0)
{
foo.SayHello();
foo.ReleaseDispatch();
}

CoUninitialize();
在VC程序中调用服务组件
1、运行VC 6.0，使用MFC程序向导创建一个新的基于对话框的MFC应用程序。

2、使用＃import导入服务组件，拷贝PRJADO.DLL到VC工程目录，打开STDAFX.H文件增加如下代码：

# import "prjado.dll "

using namespace prjado;

这段代码应该放置在:

//{{AFX_INSERT_LOCATION}}

// Microsoft Visual C++ will insert additional declarations immediately 之后和#endif 之前。

在stdafx.h文件导入dll能够让编译器在运行时连接dll的类型库，#import它能够自动产生一个对GUIDs的定义，同时自动生成对clsado对象的封装。同时能够列举它在类中所能找到的类型， VC++会在编译的时候自动生成两个文件:

一个头文件（.tlh）,它包含了列举的类型和对类型库中对象的定义；

一个实现文件（.tli）对类型库对象模型中的方法产生封装。

Namespace（名字空间）用来定义一个名字空间，使用unsing就可以将当前的类型上下文转换名字空间所定地，让我们可以访问服务组件的方法。

如果我们修改了服务组件程序，建议删除这两个文件后重新完整编译工程，以便让编译器重新列举类的属性以及函数。

3、在对话框中新添加一按钮，标题设为“测试”。双击“测试”按钮，系统提示新建一函数OnButton1对应于该按钮的CLICK事件。OnButton1函数的具体代码如下

HRESULT hresult;

CLSID clsid;

CoInitialize(NULL);

//初始化COM接口

hresult=CLSIDFromProgID(OLESTR( "prjado.clsado "), &clsid);

//得到组件的CLSID

_clsado *t;

//这就是我们在PRJADO.DLL中定义的类

hresult=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,__uuidof(_clsado),(LPVOID *) &t);

初始化CLSADO，CoCreateInstance（）的第一个参数是对象的CLSID（类代码），这个128位的编码唯一地标识了组件服务，它的路径和运行参数等信息都放在系统注册表中；第二个参数一般情况下设为NULL；第三个参数用来指明对象的运行环境，如远程或本地，此处设为CLSCTX_INPROC_SERVER，标明是服务组件是一个DLL；第四个参数指明用来与对象通信接口的ID，这也是一个128位的编码；第五个参数是用来接收对象的接口指针。

if(FAILED(hresult))

{

AfxMessageBox( "初始化服务组件失败 ");

return;

}

//如果初始化失败，弹出提示对话框后退出程序

t-> ado_Init() ;

//调用初始化函数

t-> ado_add( "从VC调用组件 ") ;

//调用增加记录函数

t-> ado_UnInit ();

//调用关闭连接函数