• vc中调用Com组件的所有方法详解


    首先,对于Com组件的入门学习,可以看一下《Windows程序设计技术基础——MFC与.NET》 任哲编著的21世纪重点大学规划教材那本书,适合入门(虽然不一定会使用),了解些基础原理。

    下面文章参考自:http://www.cppblog.com/woaidongmao/archive/2011/01/10/138250.html

    需求:
    1.创建myCom.dll,该COM只有一个组件,两个接口:
    IGetRes--方法Hello(),
    IGetResEx--方法HelloEx()

    2.在工程中导入组件或类型库

                            #import "组件所在目录myCom.dll" no_namespace

    #import "类型库所在目录myCom.tlb"
    using namespace MYCOM;



    方法一:

    CoInitialize(NULL);
    CLSID clsid;
    CLSIDFromProgID(OLESTR("myCom.GetRes"),&clsid);
    CComPtr<IGetRes> pGetRes;//智能指针
    pGetRes.CoCreateInstance(clsid);
    pGetRes->Hello();
    pGetRes.Release();//小心哦!!请看最后的“注意”
    CoUninitialize();


    方法二:

    CoInitialize(NULL);
    CLSID clsid;
    HRESULT hr=CLSIDFromProgID(OLESTR("myCom.GetRes"),&clsid);
    IGetRes *ptr;
    hr=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,
    __uuidof(IGetRes),(LPVOID*)&ptr);
    ptr->Hello();
    CoUninitialize();


    方法三:

    CoInitialize(NULL);
    HRESULT hr;
    CLSID clsid;
    hr=CLSIDFromProgID(OLESTR("myCom.GetRes"),&clsid);
    IGetRes* ptr;
    IGetResEx* ptrEx;
    //使用CoCreateClassObject创建一个组件(特别是mutilThreads)的多个对象的
    时候,效率更高.
    IClassFactory* p_classfactory;
    hr=CoGetClassObject(clsid,CLSCTX_INPROC_SERVER,
    NULL,IID_IClassFactory,
    (LPVOID*)&p_classfactory);
    p_classfactory->CreateInstance(NULL,__uuidof(IGetRes),
    (LPVOID*)&ptr);
    p_classfactory->CreateInstance(NULL,__uuidof(IGetResEx),
    (LPVOID*)&ptrEx);
    ptr->Hello();
    ptrEx->HelloEx();
    CoUninitialize();


    方法四:【不用在注册表里注册,但失去了跨平台性】
    直接从dll中得到DllGetClassObject,接着生成类对象及类实例(这方法可以
    使组件不用在注册表里注册,这是最原始的方法,但这样做没什么意义,至少失去了COM
    对用户的透明性),不推荐使用.

    typedef HRESULT (__stdcall * pfnHello)(REFCLSID,REFIID,void**);
    pfnHello fnHello= NULL;
    HINSTANCE hdllInst = LoadLibrary("组件所在目录myCom.dll");
    fnHello=(pfnHello)GetProcAddress(hdllInst,"DllGetClassObject");
    if (fnHello != 0)
    {
    IClassFactory* pcf = NULL;
    HRESULT hr=(fnHello)(CLSID_GetRes,IID_IClassFactory,(void**)&pcf);
    if (SUCCEEDED(hr) && (pcf != NULL))
    {
    IGetRes* pGetRes = NULL;
    hr = pcf->CreateInstance(NULL, IID_IFoo, (void**)&pGetRes);
    if (SUCCEEDED(hr) && (pFoo != NULL))
    {
    pGetRes->Hello();
    pGetRes->Release();
    }
    pcf->Release();
    }
    }
    FreeLibrary(hdllInst);


    方法五:
    通过ClassWizard利用类型库生成包装类,不过前提是com组件的接口必须是派
    生自IDispatch,具体方法:
    调出添加类向导(.NET中),选择类型库中MFC类,打开,选择"文件",选择
    "myCom.dll"或"myCom.tlb",接下来会出来该myCom中的所有接口,选择你想
    生成的接口包装类后,向导会自动生成相应的.h文件.这样你就可以在你的MFC中
    像使用普通类那样使用组件了.(CreateDispatch("myCom.GetRes") 中的参数就是ProgID通过Clsid在注册表中可以查询的到)

    CoInitialize(NULL);
    CGetRes getRest;
    if (getRest.CreateDispatch("myCom.GetRes") != 0)
    {
    getRest.Hello();
    getRest.ReleaseDispatch();
    }
    CoUninitialize();



    注意:
    COM中的智能指针实际上是重载了->的类,目的是为了简化引用记数,几不需要程序
    员显示的调用AddRef()和Release(),但是为什么我们在Method 1中
    pGetRes.Release(),问题在与,我们的智能指针pGetRes生命周期的结束是在
    CoUninitialize()之后,CoInitialize所开的套间在CoUninitialize()后已经被
    关闭,而pGetRes此时发生析构,导致了程序的崩溃,解决这个问题的另一个方法是

    CoInitialize(NULL);
    CLSID clsid;
    CLSIDFromProgID(OLESTR("myCom.GetRes"),&clsid);
    {
    CComPtr<IGetRes> pGetRes;//智能指针
    pGetRes.CoCreateInstance(clsid);
    pGetRes->Hello();
    }
    CoUninitialize();


    以上就是COM的5中方法,当然具体怎么使用还是在于程序的环境,加以琢磨....

  • 相关阅读:
    复制表部分内容到另一个表
    delphi使用ODAC控件TOraQuery操作表数据
    delphi使用ODAC控件查询存储过程返回结果集
    delphi使用ODAC控件事务处理(缓存提交)
    delphi使用ODAC控件事务处理(自动提交)
    delphi使用ODAC控件异步读取数据
    delphi使用ODAC控件常用功能
    delphi使用ODAC控件操作本地数据集
    时间限制关闭窗体的几点体会
    一个简单的双缓冲队列
  • 原文地址:https://www.cnblogs.com/hnfxs/p/3162272.html
Copyright © 2020-2023  润新知