vc中調用Com組件的方法詳解

來源:互聯網
上載者:User

 

--------------------------------------------------------------------------------

Requirement:
1.建立myCom.dll,該COM只有一個組件,兩個介面IGetRes--方法Hello(),
   IGetResEx--方法HelloEx()
2.在工程中匯入組件或類型庫
   #import "組件所在目錄myCom.dll" no_namespace
        或
   #import "類型庫所在目錄myCom.tlb"
   using namespace MYCOM;

--Method 1-------------------------------------------------------
   CoInitialize(NULL);
   CLSID clsid;
   CLSIDFromProgID(OLESTR("myCom.GetRes"),&clsid);
   CComPtr<IGetRes> pGetRes;//智能指標
   pGetRes.CoCreateInstance(clsid);
   pGetRes->Hello();
   pGetRes.Release();//小心哦!!請看最後的“注意”
   CoUninitialize();
--Method 2---------------------------------------------------------
   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();
--Method 3--------------------------------------------------------
   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();
--Method 4--------------------------------------------------------
    直接從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);
--Method 5-------------------------------------------------------
    通過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中方法,當然具體怎麼使用還是在於程式的環境,加以琢磨....

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.