用ATL创建COM组件详细解说
一、創(chuàng)建一個模型(工程) MyProj。
二、給模型(工程)增加一個組件 MyCom。
三、給組件增加方法(函數(shù)) MyF1、MyF2、MyF3、MyF4。
一、創(chuàng)建模型(工程) MyProj
在VC++6.0工作平臺中，點擊菜單 File 下的 New 菜單項，在出現(xiàn)的 New 對話框中選中 Projects 卡片，在列表框中選中 ATL COM AppWizard（活動模板庫組件導航）。
在 Project Name 編輯框中輸入項目名如 MyProj ，并選擇合適的 Location 后，按確認按鈕進入下一個對話框：ATL COM Appwizard - step 1 of 1，在 Server Type 中選擇 Dynamic Link Library [ DLL ]，即進程內(nèi)服務(wù)器，這是最快的組件。
選中 Support MFC 選擇項。
在按下 Finish 和 Ok 按鈕后，一個組件的框架已經(jīng)建立。
二、給模型增加組件MyCom
在VC++ 菜單 Insert 中選中 New ATL Object…菜單項，出現(xiàn) ATL Object Wizard 對話框。
在左邊的 Category 中選擇 Objects，右邊的 Objects 中選中 Simple Object 項。按 Next 按鈕。
在出現(xiàn)的 ATL Object Wizard 屬性對話框中 Names 卡片中的八個編輯框中左上方的 Short Name 編輯框中輸入短名如 MyCom ，其他七個編輯框的內(nèi)容會自動生成。然后按確認按鈕退出。
三、給組件增加方法(函數(shù)) MyF1、MyF2、MyF3、MyF4
在 VC++工作平臺的左邊的 Workspace 的 ClassView 卡片中找到接口 IMyCom 項，按右鍵，在出現(xiàn)的快捷菜單中選擇 Add Method …，出現(xiàn) Add Method to Interface 對話框，在對話框中輸入要增加的函數(shù)的函數(shù)名、參數(shù)和返回值類型。然后，按確認按鈕退出。
先增加函數(shù) MyF1：
函數(shù)名為： MyF1
參數(shù)：無
在MyCom.cpp文件中插入代碼：
STDMETHODIMP CMyCom::MyF1()
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())
// TODO: Add your implementation code here
AfxMessageBox(“歡迎使用我的組件”);
return S_OK;
}
用同樣的方法給組件增加函數(shù)MyF2：
函數(shù)名為： MyF2
參數(shù)為：
[in] BSTR str,
[out, retval] int* val
插入代碼：
STDMETHODIMP CMyCom::MyF2(BSTR str, int *val)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())
// TODO: Add your implementation code here
CString sStr(str);
int n = sStr.GetLength();
*val = n;
return S_OK;
}
用同樣的方法給組件增加函數(shù) MyF3：
函數(shù)名為： MyF3
參數(shù)為：
[in] BSTR str,
[out, retval] BSTR* retstr
插入代碼:
STDMETHODIMP CMyCom::MyF3(BSTR str, BSTR *retstr)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())
// TODO: Add your implementation code here
CString sStr(str);
CString sRetstr = “組件收到你的信息：<” + sStr + “>\n特此告之。”;
CComBSTR temp(sRetstr);
*retstr = temp;
return S_OK;
}
用同樣的方法給組件增加函數(shù)MyF4：
函數(shù)名為： MyF4
參數(shù)為：
[in] int x,
[out, retval] int* val
插入代碼：
STDMETHODIMP CMyCom::MyF4(int x, int *val)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())
// TODO: Add your implementation code here
*val = x+1;
return S_OK;
}
編繹工程，生成組件DLL。
如果是在 Win2k 或者 WinXp 的計算機上完成了上面的三步操作，就會在 debug 子目錄下生成組件的 DLL 文件，并且完成自動注冊。但是在 Win98 的計算機上，注冊要運行如下命令才能完成：
regsrv32 C:\MyProj\Debug\MyProj.dll
創(chuàng)建 COM 組件客戶
1，創(chuàng)建一個基于對話框的客戶程序。
2，把服務(wù)器類型庫導入客戶工作平臺。
3，初始化 COM 庫。
4，獲得服務(wù)器的 GLSID。
5，創(chuàng)建 COM 組件服務(wù)器組件的實例。
6，使用 COM 對象。
7，終止 COM 庫。
1，創(chuàng)建一個客戶程序
用 MFC AppWizard ( exe ) 創(chuàng)建一個基于對話框的應(yīng)用程序 MyExe。
在對話框中放置四個按鈕，分別為 MyF1、MyF2 、MyF3和 MyF4。
用 ClassWizard 生成單擊按鈕的四個響應(yīng)函數(shù) OnMyF1() 、OnMyF2() 、OnMyF3()和 OnMyF4()。
2，把服務(wù)器類型庫導入客戶
2-1在 StdAfx.h 文件中加入代碼:
#import “…\MyProj\MyProj.tlb”
最后的StdAfx.h文件如下：
// stdafx.h : include file for standard system include files,
// or project specific include files that are used frequently, but
// are changed infrequently
//
#if !defined(AFX_STDAFX_H__2B646017_28AD_4CDE_9792_CB8F9A5C6B39__INCLUDED_)
#define AFX_STDAFX_H__2B646017_28AD_4CDE_9792_CB8F9A5C6B39__INCLUDED_
#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000
#define VC_EXTRALEAN // Exclude rarely-used stuff from Windows headers
#include <afxwin.h> // MFC core and standard components
#include <afxext.h> // MFC extensions
#include <afxdisp.h> // MFC Automation classes
#include <afxdtctl.h> // MFC support for Internet Explorer 4 Common Controls
#ifndef _AFX_NO_AFXCMN_SUPPORT
#include <afxcmn.h> // MFC support for Windows Common Controls
#endif // _AFX_NO_AFXCMN_SUPPORT
#import “…\MyProj\MyProj.tlb”
//{{AFX_INSERT_LOCATION}}
// Microsoft Visual C++ will insert additional declarations immediately before the previous line.
#endif // !defined(AFX_STDAFX_H__2B646017_28AD_4CDE_9792_CB8F9A5C6B39__INCLUDED_)
編譯 StdAfx.cpp，
這樣在客戶端的debug目錄下生成組件的類型庫頭文件(.tlh)和類型庫實現(xiàn)文件(.tli)。
2-2在使用組件的源文件上方使用名字空間，最后的源文件上面部分代碼如下
// MyExeDlg.cpp : implementation file
//
#include “stdafx.h”
#include “MyExe.h”
#include “MyExeDlg.h”
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = FILE;
#endif
using namespace MYPROJLib;
以下代碼略
3，初始化 COM 庫
HRESULT hr=CoInitialize(NULL);
4，獲得服務(wù)器組件的 CLSID
CLSID clsid;
hr=CLSIDFromProgID(OLESTR(“MyProj.MyCom”),&clsid);
if(FAILED(hr))
{
AfxMessageBox("COM Failed");return;}
5，創(chuàng)建 COM 服務(wù)器組件實例，獲得組件接口指針
IMyCom ptr = NULL;
hr=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,__uuidof(IMyCom),(LPVOID)&ptr);
6-1，在OnMyF1()中使用 COM 對象 MyF1()
ptr->MyF1();
ptr->Release(); // 釋放實例
6-2，在OnMyF2()中使用 COM 對象 MyF2()
char str[32];
sprintf(str,“Len=%d”,ptr->MyF2(“abcdefg”));
AfxMessageBox(str);
ptr->Release();// 釋放實例
6-3，在OnMyF3()中使用 COM 對象 MyF3()
AfxMessageBox(ptr->MyF3(“abcdefg”));
ptr->Release(); // 釋放實例
6-4，在OnMyF4()中使用 COM 對象 MyF4()
int x=8; char str[32];
sprintf(str,“x=%d,x+1=%d”,x,ptr->MyF4(x));
AfxMessageBox(str);
ptr->Release();// 釋放實例
7，終止 COM 庫
CoUninitialize();
下面為客戶測試端四個函數(shù)的完整代碼。
// MyExeDlg.cpp : implementation file
//
#include “stdafx.h”
#include “MyExe.h”
#include “MyExeDlg.h”
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = FILE;
#endif
using namespace MYPROJLib;
/
// CAboutDlg dialog used for App About
class CAboutDlg : public CDialog
{
public:
CAboutDlg();// Dialog Data
//{{AFX_DATA(CAboutDlg)enum { IDD = IDD_ABOUTBOX };//}}AFX_DATA// ClassWizard generated virtual function overrides//{{AFX_VIRTUAL(CAboutDlg)protected:virtual void DoDataExchange(CDataExchange* pDX); // DDX/DDV support//}}AFX_VIRTUAL// Implementation
protected:
//{{AFX_MSG(CAboutDlg)//}}AFX_MSGDECLARE_MESSAGE_MAP()};
CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
//{{AFX_DATA_INIT(CAboutDlg)//}}AFX_DATA_INIT}
void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);//{{AFX_DATA_MAP(CAboutDlg)//}}AFX_DATA_MAP}
BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
//{{AFX_MSG_MAP(CAboutDlg)// No message handlers//}}AFX_MSG_MAPEND_MESSAGE_MAP()
/
// CMyExeDlg dialog
CMyExeDlg::CMyExeDlg(CWnd* pParent /=NULL/){
//{{AFX_DATA_INIT(CMyExeDlg)// NOTE: the ClassWizard will add member initialization here//}}AFX_DATA_INIT// Note that LoadIcon does not require a subsequent DestroyIcon in Win32m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);}
void CMyExeDlg::DoDataExchange(CDataExchange* pDX)
{
CDialog::DoDataExchange(pDX);//{{AFX_DATA_MAP(CMyExeDlg)// NOTE: the ClassWizard will add DDX and DDV calls here//}}AFX_DATA_MAP}
BEGIN_MESSAGE_MAP(CMyExeDlg, CDialog)
//{{AFX_MSG_MAP(CMyExeDlg)ON_WM_SYSCOMMAND()ON_WM_PAINT()ON_WM_QUERYDRAGICON()ON_BN_CLICKED(IDC_BUTTON1, OnMyF1)ON_BN_CLICKED(IDC_BUTTON2, OnMyF2)ON_BN_CLICKED(IDC_BUTTON3, OnMyF3)ON_BN_CLICKED(IDC_BUTTON4, OnMyF4)//}}AFX_MSG_MAPEND_MESSAGE_MAP()
/
// CMyExeDlg message handlers
BOOL CMyExeDlg::OnInitDialog()
{
CDialog::OnInitDialog();// Add "About" menu item to system menu.// IDM_ABOUTBOX must be in the system command range.ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);ASSERT(IDM_ABOUTBOX < 0xF000);CMenu* pSysMenu = GetSystemMenu(FALSE);if (pSysMenu != NULL){CString strAboutMenu;strAboutMenu.LoadString(IDS_ABOUTBOX);if (!strAboutMenu.IsEmpty()){pSysMenu->AppendMenu(MF_SEPARATOR);pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);}}// Set the icon for this dialog. The framework does this automatically// when the application's main window is not a dialogSetIcon(m_hIcon, TRUE); // Set big iconSetIcon(m_hIcon, FALSE); // Set small icon// TODO: Add extra initialization herereturn TRUE; // return TRUE unless you set the focus to a control}
void CMyExeDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
if ((nID & 0xFFF0) == IDM_ABOUTBOX){CAboutDlg dlgAbout;dlgAbout.DoModal();}else{CDialog::OnSysCommand(nID, lParam);}}
// If you add a minimize button to your dialog, you will need the code below
// to draw the icon. For MFC applications using the document/view model,
// this is automatically done for you by the framework.
void CMyExeDlg::OnPaint()
{
if (IsIconic()){CPaintDC dc(this); // device context for paintingSendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);// Center icon in client rectangleint cxIcon = GetSystemMetrics(SM_CXICON);int cyIcon = GetSystemMetrics(SM_CYICON);CRect rect;GetClientRect(&rect);int x = (rect.Width() - cxIcon + 1) / 2;int y = (rect.Height() - cyIcon + 1) / 2;// Draw the icondc.DrawIcon(x, y, m_hIcon);}else{CDialog::OnPaint();}}
// The system calls this to obtain the cursor to display while the user drags
// the minimized window.
HCURSOR CMyExeDlg::OnQueryDragIcon()
{
return (HCURSOR) m_hIcon;}
void CMyExeDlg::OnMyF1()
{
// TODO: Add your control notification handler code hereHRESULT hr=CoInitialize(NULL);CLSID clsid; hr=CLSIDFromProgID(OLESTR("MyProj.MyCom"),&clsid);if(FAILED(hr)){AfxMessageBox("COM Failed");return;}IMyCom *ptr = NULL;hr=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,__uuidof(IMyCom),(LPVOID*)&ptr); ptr->MyF1();ptr->Release(); // 釋放實例CoUninitialize();}
void CMyExeDlg::OnMyF2()
{
// TODO: Add your control notification handler code hereHRESULT hr=CoInitialize(NULL);CLSID clsid; hr=CLSIDFromProgID(OLESTR("MyProj.MyCom"),&clsid);if(FAILED(hr)){AfxMessageBox("COM Failed");return;}IMyCom *ptr = NULL;hr=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,__uuidof(IMyCom),(LPVOID*)&ptr); char str[32];sprintf(str,"Len=%d",ptr->MyF2("abcdefg"));AfxMessageBox(str);ptr->Release();// 釋放實例CoUninitialize();}
void CMyExeDlg::OnMyF3()
{
// TODO: Add your control notification handler code hereHRESULT hr=CoInitialize(NULL);CLSID clsid; hr=CLSIDFromProgID(OLESTR("MyProj.MyCom"),&clsid);if(FAILED(hr)){AfxMessageBox("COM Failed");return;}IMyCom *ptr = NULL;hr=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,__uuidof(IMyCom),(LPVOID*)&ptr); AfxMessageBox(ptr->MyF3("abcdefg"));ptr->Release(); // 釋放實例CoUninitialize();}
void CMyExeDlg::OnMyF4()
{
// TODO: Add your control notification handler code hereHRESULT hr=CoInitialize(NULL);CLSID clsid; hr=CLSIDFromProgID(OLESTR("MyProj.MyCom"),&clsid);if(FAILED(hr)){AfxMessageBox("COM Failed");return;}IMyCom *ptr = NULL;hr=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,__uuidof(IMyCom),(LPVOID*)&ptr); int x=8; char str[32];sprintf(str,"x=%d,x+1=%d",x,ptr->MyF4(x));AfxMessageBox(str);ptr->Release();// 釋放實例CoUninitialize();}
通過這個簡單的例子，我們做了最簡單的COM組件，及測試組件的客戶端，在這里只是教大家如何用VC ATL做COM組件，在接下來這一篇里Developing COM Components using VC-ATL(2)將對COM的基本原理進行介紹，以及對這一例子的源代碼進行剖析。
COM基礎(chǔ)知識
COM的產(chǎn)生
應(yīng)用程序被開發(fā)來支持公司業(yè)務(wù)運轉(zhuǎn)，應(yīng)用程序獲取作為輸入的數(shù)據(jù)，處理基于業(yè)務(wù)規(guī)則的數(shù)據(jù)，和提供作為輸出的數(shù)據(jù)和信息。基于這一事實，所有的應(yīng)用程序都有三個要素：
n 用戶界面或呈現(xiàn)要素，通過它們可以輸入數(shù)據(jù)。
n 應(yīng)用程序邏輯或業(yè)務(wù)規(guī)則要素，它們有助于實現(xiàn)對輸入數(shù)據(jù)執(zhí)行有效性、可用性操作。
n 數(shù)據(jù)存儲或數(shù)據(jù)管理要素，它們管理數(shù)據(jù)的存儲和恢復(fù)。
這三個要素養(yǎng)組成了用于應(yīng)用程序開發(fā)模型或體系結(jié)構(gòu)的基礎(chǔ)。
根據(jù)具體的用途和配置，開發(fā)都在他們的應(yīng)用程序中決定采用何種體系結(jié)構(gòu)時有三種選擇：
n 單層模型
n 雙層模型
n 三層或多層模型
作為一個開發(fā)者，在決定應(yīng)用程序的體系結(jié)構(gòu)之前，你要考慮以下因素：
n 伸縮性：這指的是應(yīng)用程序適應(yīng)新的硬件環(huán)境的性能。例如，當一個應(yīng)用程序從一個單處理器計算機移到一個多處理計算機時，它是否能使用新增加的處理器，這些處理器在新硬件上是否發(fā)揮了作用。
n 可用性：這指的是應(yīng)用程序滿足用戶增加要求的能力。可能有一百個用戶正在請求同樣的數(shù)據(jù)，但是只有少數(shù)用戶獲得數(shù)據(jù)，其他的用戶則顯示一則消息“請稍后再試”。
n 擴展性：這指的是應(yīng)用程序有時遞增地增加特色來提高性能和提供更好的功能給用戶的能力。
n 維護性：這指的是根據(jù)人力和時間使用最小化的資源和最大化的有效性來響應(yīng)修修復(fù)改錯誤的能力。
n 安全性：這指的是應(yīng)用程序維持數(shù)據(jù)完整性、可靠性的能力。任何未經(jīng)認可的用戶都不允許篡改數(shù)據(jù)。
n 性能：這指的是應(yīng)用程序在最短的時間內(nèi)響應(yīng)用戶請求的能力。用戶不要等待很長時間就能獲得請求數(shù)據(jù)。
為了設(shè)計更健壯的應(yīng)用程序體系結(jié)構(gòu)，三(多)層體系結(jié)構(gòu)就運用而生。三層體系結(jié)構(gòu)是一種邏輯應(yīng)用程序觀點，在這種體系結(jié)構(gòu)中應(yīng)用程序分成以下三層邏輯組成部分：
n 用戶服務(wù)層。用戶服務(wù)層管理用戶界面。
n 業(yè)務(wù)服務(wù)層。業(yè)務(wù)服務(wù)層管理由應(yīng)用程序?qū)崿F(xiàn)的業(yè)務(wù)邏輯。業(yè)務(wù)邏輯由支配應(yīng)用程序處理的規(guī)則組成。這一層對用戶封裝了業(yè)務(wù)邏輯，因而用戶不必了解業(yè)務(wù)邏輯或業(yè)務(wù)規(guī)則是如何使用的。業(yè)務(wù)規(guī)則的任何變化將導致僅對業(yè)務(wù)服務(wù)層的更改，而應(yīng)用程序的其余部分保持不變。業(yè)務(wù)服務(wù)層實現(xiàn)用于應(yīng)用程序的多條規(guī)則。這一層扮演了用戶服務(wù)層和數(shù)據(jù)服務(wù)層間連接的角色。
n 數(shù)據(jù)服務(wù)層。數(shù)據(jù)服務(wù)層負責維護數(shù)據(jù)，通常為RDBMS。這一層維護數(shù)據(jù)的有效性和完整性，并且負責從數(shù)據(jù)存儲中增加、修改和刪除數(shù)據(jù)。
現(xiàn)在，我們?nèi)绾蝸碜鰳I(yè)務(wù)服務(wù)層呢?答案就是COM。
什么是COM?
COM即為組件對象模型，它為開發(fā)組件定義了標準。它定義了組件交互標準、協(xié)議標準和組件的物理結(jié)構(gòu)來確保組件間的互用性。一個組件就是一個執(zhí)行特定操作的程序或二進制對象。下面我們就從組件的一些特點和功能來理解一下COM：
n COM是一種規(guī)范。COM規(guī)范描述了為創(chuàng)建能共同操作的組件而必須遵守的標準。這個標準描述了COM是什么和它們是如何運轉(zhuǎn)的，以及說明了如何可動態(tài)交替更新組件。
n COM是一套服務(wù)。COM規(guī)范是由一套服務(wù)或APIs來支持的。COM庫提供這些服務(wù)，它們是WIN32平臺操作系統(tǒng)的一部分并且可用于當作其他操作系統(tǒng)的一個單獨的包。
n COM是面向?qū)ο蟮摹OM組件對象有標識、狀態(tài)和行為。
n COM能夠容易的用戶化和升級你的應(yīng)用程序。COM組件動態(tài)地相互聯(lián)結(jié)，并且COM定義了定位其他組件和鑒定其功能的標準。因此，組件可以交換而不必重新編繹整個應(yīng)用程序。
n COM能夠分布式應(yīng)用。位置透明性是COM的特性之一。這使得你可以編寫COM組件而不必考慮它們的位置。組件可以移動而不要求對使用它們的應(yīng)用程序作任何改變。
n COM組件可以用任何語言編寫。任何能夠處理二進制語言都能用于創(chuàng)建COM對象。能創(chuàng)建組件的語言和工具包括C/C++、JAVA、VISUAL BASIC和VISUAL C++等。
到目前為止，微軟提倡的這套COM軟件開發(fā)模式是最為符合現(xiàn)在計算機工業(yè)軟件生產(chǎn)的方法。Microsoft的許多技術(shù)，如ActiveX, DirectX以及OLE等都是基于COM而建立起來的。并且Microsoft的開發(fā)人員也大量使用COM組件來定制他們的應(yīng)用程序及操作系統(tǒng)。在COM構(gòu)架下，程序員可以開發(fā)出各種各樣的功能專一的組件，然后將它們按照需要組建起來，構(gòu)成復(fù)雜的應(yīng)用系統(tǒng)。由此帶來的好處是多方面的：n 使用組件的最大好處首先是可以將它們動態(tài)的插入或卸出應(yīng)用系統(tǒng)，是真正意義上的軟件模塊即插即用。組件可以在運行時刻，在不被重新鏈接或編譯應(yīng)用程序的情況下，可以將系統(tǒng)中的組件用新的組件替換掉，以便即時方便地進行系統(tǒng)的升級和定制。這樣做的最大好處是程序員可以利用最新的技術(shù)寫出的最新組件取代以有的舊組件而整個系統(tǒng)的其他部分不需要一點改動。應(yīng)用程序可以隨新組件不斷取代舊的組件而漸趨完善且健壯。而且利用已有的組件，用戶還可以快速的建立全新的應(yīng)用。(注意：替換的組件均為自定義的組件，不是COM本身的運行時間庫中的組件)
n 二進制重用。按照COM規(guī)范，組件可以在多個應(yīng)用系統(tǒng)中重復(fù)利用同一組件。
n 分布式應(yīng)用。利用COM/DCOM組件技術(shù)，可以方便的將應(yīng)用系統(tǒng)擴展到網(wǎng)絡(luò)環(huán)境下。
n COM與語言無關(guān)。可以使用多種語言編寫COM組件，如DELPHI、VISUAL BASIC…這使得程序員可以利用自己擅長的語言來編寫組件，而無須學習其他專門的語言來編寫組件。
n COM與平臺無關(guān)。利用已編寫的組件可以方便地在不同平臺間移植。
在三層體系結(jié)構(gòu)中，創(chuàng)建COM組件來實現(xiàn)業(yè)務(wù)服務(wù)層。因為COM組件能夠相互作用，每個組件必須嚴格地貫徹由COM擬定的完整的標準。
COM具有顯著的優(yōu)點在于它提供了三個獨有的特性：
n 調(diào)用組件間功能的二進制標準。COM確保用VISUAL BASIC開發(fā)的客戶端和用VISUAL C++開發(fā)并且運行于Solaris或Mac服務(wù)端的組件間完全的二進制的兼容性。因此，COM允許你創(chuàng)建確實是獨立于語言和操作系統(tǒng)的代碼模塊。
n 代碼重用。因為接口是文檔化的，所以創(chuàng)建對象的代碼能被不同的客戶使用。
n 版本控制。基于COM的組件是自我版本化的。暗示新的功能可以增加到組件中，而不影響已使用該組件的用戶(/客戶)
由此可見，COM組件是真正地面向?qū)ο?#xff0c;提供簡易的用戶化，提供地址透明并且能用任何語言編寫。正由于COM具有這些優(yōu)點，COM得到了廣泛應(yīng)用。
COM組件是真正地面向?qū)ο?/p>
n 傳統(tǒng)的面向?qū)ο缶幊?/p>
面向?qū)ο缶幊淌且粋€被廣大編程人員和工業(yè)界認同已久的概念。面向?qū)ο蟪绦蛟O(shè)計語言讓開發(fā)者按照現(xiàn)實世界里人們思考問題的模式來編寫程序，它讓開發(fā)者更好地用代碼直接表達現(xiàn)實中存在的對象，這樣開發(fā)代碼簡單并且易于維護。面向?qū)ο笳Z言有以下三個最重要的概念：
n 封裝（Encapsulation） 強調(diào)隱藏對象的實現(xiàn)細節(jié)，對象的使用者僅僅通過定義好的接口使用對象。
n 繼承（Inheritance） 新的對象可以利用舊的對象的功能。
n 多態(tài)（Polymorphism） 根據(jù)所使用的對象展現(xiàn)多種不同行為的能力。
而從程序的整體來看，面向?qū)ο缶幊烫峁┙o用戶的最重要的概念則是源代碼重用，它對于提高編寫程序的效率極為重要。但是代碼的共享與重用一旦應(yīng)用于實踐中仍然存在種種問題，如版本的升級、接口[1]的變化、在不同程序設(shè)計語言之間共享代碼等等。對于這些困難原有的面向?qū)ο蟪绦蛟O(shè)計方法并沒有相應(yīng)的答案，這就是組件對象模型提出的背景。
n 基于組件編程
它與傳統(tǒng)面向?qū)ο竽Ｐ陀兄镜膮^(qū)別，傳統(tǒng)的面向?qū)ο缶幊棠Ｐ偷闹攸c是源程序以及系統(tǒng)分析和設(shè)計過程，面向?qū)ο髿w根到底還是基于源代碼的重用，不是真正意義上的面向?qū)ο蟆Ｏ喾?#xff0c;COM組件的概念則強調(diào)大的軟件系統(tǒng)如何由不同的小組件構(gòu)成整體應(yīng)用程序體系結(jié)構(gòu)。
將工程分解為邏輯組件是面向組件分析和設(shè)計的基礎(chǔ)，這也是組件軟件的基礎(chǔ)。組件軟件系統(tǒng)由可重用的二進制形式的軟件組件模塊組成，只需要相當小的改動就可以將這些來自不同開發(fā)商的組件模塊組合在一起。特別重要的是這樣的組合并不需要源代碼，也不需要重新編譯，組件之間是通過基于二進制的規(guī)范進行通訊的，這被稱為二進制重用。組件模塊是獨立于編程語言的，使用組件的客戶程序和組件之間除了通過標準的方法進行通訊以外，彼此不做任何限定。
組件可以劃分為不同的類型，包括可視化組件如按鈕或者列表框；功能組件如打印或者拼寫檢查。例如一個基于組件的架構(gòu)可以提供將多個開發(fā)商的拼寫檢查組件插入到另一個開發(fā)商的字處理應(yīng)用程序中的機制，這樣用戶可以根據(jù)自己的喜好方便地選擇和替換字處理軟件。
COM允許你創(chuàng)建相互聯(lián)合起來形成應(yīng)用程序的獨立的、可重用的組件。在COM中，組件間的相互作用是基于Client/Server模型的(即客戶機和服務(wù)器模型)。基于這個模型，COM組件可以分類為：
n Client 使用由其他組件提供的功能。
n Server 有其他組件可能使用的預(yù)先確定的功能的組件。
客戶程序和組件程序是相對的，進行功能請求調(diào)用的是客戶程序，而響應(yīng)該請求的是組件程序。組件程序也可以作為客戶程序去調(diào)用其它的組件程序，即提供服務(wù)給客戶端的COM服務(wù)器可能是客戶本身。正是這種角色的轉(zhuǎn)換和相互調(diào)用關(guān)系使組件程序最終構(gòu)成一個軟件系統(tǒng)。
服務(wù)器組件的類型COM設(shè)計為允許組件相互通信而不管它們的地址。例如，用戶接口組件將最好定位于接近客戶端。另一方面，提供遠程數(shù)據(jù)統(tǒng)計計算的組件將隨同將被操作的數(shù)據(jù)可能定位在一臺分離的計算機上。COM服務(wù)端組件可分為三類：n 進程內(nèi)組件 進程內(nèi)服務(wù)器[2]是裝入客戶端的進程空間內(nèi)的組件，即客戶程序和組件程序在同一個進程地址空間內(nèi)。在客戶端和服務(wù)端組件間有大量數(shù)據(jù)轉(zhuǎn)移操作的情況下是理想的。進程內(nèi)服務(wù)器會更快地裝載。由于它占用和客戶端應(yīng)用程序同樣的地址空間，它可以與客戶端更快的通信。進程內(nèi)服務(wù)器是通過將組件作為動態(tài)連接庫(DLL)的形式來實現(xiàn)的。DLL允許特定的一套功能以分離于可執(zhí)行的、以DLL為擴展名的文件進行存儲。只有當程序需要它們時，DLL才將其裝入內(nèi)存中，客戶程序?qū)⒔M件程序加載到自己的進程地址空間后再調(diào)用組件程序的函數(shù)。
n 本地(即進程外)組件 進程外組件指客戶程序和組件程序分別處在不同的進程空間地址中。進程外服務(wù)器對需要運行于獨立的處理空間或作為獨立客戶端應(yīng)用程序的線程的組件是理想的。這種服務(wù)器的類型自身是EXE，因此具有獨立的進程的資格。由于數(shù)據(jù)必須從一個地址空間移到另一個地址空間，因此這些服務(wù)器就會慢得多。由于進程外服務(wù)器是可執(zhí)行的，它們運行在自己的線程內(nèi)。當客戶端代碼正在執(zhí)行時，客戶端不鎖住服務(wù)器。進程外服務(wù)器對需要表現(xiàn)為獨立的應(yīng)用程序的組件也是理想的。例如，Microsoft Internet Explorer的應(yīng)用程序是本地服務(wù)器的例子。客戶端和服務(wù)端的通信是通過進程內(nèi)的通信協(xié)議進行的，這個通信協(xié)議是IPC。
n 遠程組件 遠程服務(wù)器與本地服務(wù)器類似，除了遠程服務(wù)器是運行在通過網(wǎng)絡(luò)連接的分離的計算機上。這種功能是使用DCOM實現(xiàn)的。DCOM的優(yōu)點在于它并不要求任何特別的編程來使具有功能。另外服務(wù)端和客戶端通信是通過RPC通信協(xié)議進行的。
對于這三種不同的服務(wù)器組件，客戶程序和組件程序交互的內(nèi)在方式是完全不同的。但是對于功能相同的進程內(nèi)和進程外組件，從程序編寫的角度看，客戶程序是以同樣的方法來使用組件程序的，客戶程序不需要做任何的修改。
COM的真相
COM是一種軟件體系結(jié)構(gòu)，這種體系結(jié)構(gòu)允許用不同的軟件商提供的組件來構(gòu)造應(yīng)用程序和系統(tǒng)。它是一套二進制的和網(wǎng)絡(luò)標準，允許任何軟件相互通信而不管硬件、操作系統(tǒng)OS和用于開發(fā)的編程語言。COM不是一種編程語言而是一套規(guī)范，它定義了組件怎么樣可以相互通信。
每個COM組件被編寫成滿足由COM規(guī)定的二進制標準。這一些標準是：n 組件要求注意它們自己(即組件對象[3])的創(chuàng)建和銷毀
n 組件要求以標準方式提供它們的功能(即通過接口[4])
n 組件的位置要求對用戶透明
使用組件的優(yōu)點在于具有將它們動態(tài)裝載或卸出應(yīng)用程序系統(tǒng)的能力。為了達到這一目的，組件必須滿足兩個需求：
n 組件必須動態(tài)鏈接[5]。這允許它們在運行時改變。如果應(yīng)用程序是由每次組件改變時靜態(tài)鏈接的組件組成，那么應(yīng)用程序就等同于一個單一的應(yīng)用程序。
n 在實現(xiàn)時組件必須隱藏。每個組件具有唯一識別自己的ID作為標識。這些ID出現(xiàn)在系統(tǒng)注冊表HKEY_CLASSES_ROOT目錄里。
動態(tài)鏈接對于組件而言是一個至關(guān)重要的要求，而實現(xiàn)細節(jié)隱藏則是動態(tài)鏈接的一個必要條件。
COM的工作方式到目前為止，顯然COM并不僅僅是書面形式的規(guī)范。它也包含系統(tǒng)級的代碼，即它自身的實現(xiàn)。COM規(guī)則出現(xiàn)在COM運行庫里。組件對象庫，即COM運行時間庫是一個系統(tǒng)組件，這個系統(tǒng)組件提供能夠在進程內(nèi)、進程外或通過網(wǎng)絡(luò)進行調(diào)用的COM。COM核心，簡單地講，是組件對象和客戶端使用二進制標準如何交互的規(guī)范。COM在操作系統(tǒng)內(nèi)的實現(xiàn)為COM運行時間庫。COM運行時間庫包括：n API函數(shù)
n 服務(wù)
n 允許應(yīng)用程序在進程內(nèi)控制內(nèi)存分配的標準機制
n …
組件對象庫是通過Windows3.1中的COMPOBJ.DLL以及Windows NT和Windows 9X中的OLE32.DLL實現(xiàn)的。接口n 概述
n 組件對象高度地封裝。組件對象的內(nèi)部實現(xiàn)對用戶完全隱藏，根本無法知道組件對象在使用何種數(shù)據(jù)結(jié)構(gòu)和這些數(shù)據(jù)是如何被函數(shù)處理的。每個組件有一個接口，這個接口是一種且唯一的訪問組件對象功能的方式。接口是由一組虛函數(shù)的聲明組成。它使得預(yù)期的行為和響應(yīng)清淅化。接中并不具有這些函數(shù)的實現(xiàn)。函數(shù)是通過組件類(CoClass)實現(xiàn)的。組件類實例化時生成組件對象。
n 接口是用稱為虛函數(shù)表(VTable)的內(nèi)存結(jié)構(gòu)實現(xiàn)的。無論何時創(chuàng)建組件對象，組件對象也在內(nèi)存中創(chuàng)建一張對應(yīng)的虛函數(shù)表。虛函數(shù)表是由一系列指針組成，這些指針存儲了由組件對象實現(xiàn)的成員函數(shù)的地址。
n 客戶端創(chuàng)建一個接口指針，接口指針指向一個虛指針，虛指針指向虛函數(shù)表。使用接口指針和虛指針，客戶端就可以訪問組件對象實現(xiàn)的成員函數(shù)。
VTable是一個函數(shù)指針數(shù)組的內(nèi)存結(jié)構(gòu)。每一個數(shù)組元素包含的是一個由組件所實現(xiàn)的函數(shù)地址。對于COM而言，接口也就是此內(nèi)存結(jié)構(gòu)，其他東西，均是COM不關(guān)心的實現(xiàn)細節(jié)。
n 特征
n 接口是集合在同一個名稱(是一個系統(tǒng)唯一的ID值，稱IID)下的相關(guān)函數(shù)(/方法)的集合。這說明接口必須是全球唯一的。
n 如前所述，當組件類實例化時產(chǎn)生組件對象。接口是由組件對象實現(xiàn)的函數(shù)的集合。接口不可以被實例化，因為它沒有實現(xiàn)。
n 組件之間的通訊是基于接口的。接口是組件和其客戶之間嚴格類型化的契約。實現(xiàn)相同接口的兩個對象就被認為是多態(tài)的，這里的多態(tài)不包含諸如基類指針指向派生類對象的意義，這里是指同一個接口可以由多個組件對象以不同方法實現(xiàn)。
n 組件對象可以實現(xiàn)多個接口。例如，銀行交易組件(BankTransaction)支持兩個接口，IDebit和ICredit，即借和貸；又例如，Microsoft SQL SERVER數(shù)據(jù)庫服務(wù)器組件(SqlImplementation)支持兩個接口，一個是維護數(shù)據(jù)處理，另一個是維護數(shù)據(jù)定義。數(shù)據(jù)處理接口提供增加、更新和刪除數(shù)據(jù)方法，然而，數(shù)據(jù)定義接口提供創(chuàng)建數(shù)據(jù)庫、表和視圖的方法。
n 接口沒有版本化并且是不變的，如果功能必須改變以適應(yīng)一個接口，則將創(chuàng)建一個有唯一標識的完全新接口。組件對象實現(xiàn)這兩個接口，因而解決了版本問題。為較早版本的接口制作的客戶端仍舊可以訪問原來的接口。
n 注意
n 原來的舊接口是可以改變的，但是接口中的函數(shù)說明不能改變，即接口中的函數(shù)的函數(shù)名、參數(shù)形式不能改變，因為這樣改變就需要使得客戶端調(diào)用服務(wù)的代碼進行修改和進行重新編繹。但是接口中的函數(shù)的函數(shù)體是可以修改的。這就是接口不變性的本質(zhì)，也是COM規(guī)范。
COM標識符因為全球都在開發(fā)和使用組件，因此需要標識唯一地標識每個組件。開發(fā)軟件基金會(OSF)研究出一種能產(chǎn)生唯一標識符的算法，稱之為全球唯一標識符(UUID)。在COM中，UUID被稱之為全局唯一標識符(GUID)。GUID是能分配給接口、組件類和類型庫的128位或16字節(jié)數(shù)。GUID唯一地標識組件。生成GUID的算法根據(jù)以下幾個方面：n 當前日期和時間。
n 網(wǎng)絡(luò)適配器卡地址。
n 時針序。
n 自動遞增計數(shù)器。
COM使用的128位的接口標識符使得我們可能創(chuàng)建大約340282366920900000000000000000000000000個獨立的接口，足夠為將來10782897524560000000年每秒創(chuàng)建一萬億個接口。網(wǎng)卡地址是相互不同的，對沒有網(wǎng)卡的機器，地址對使用中的機器保持唯一性。GUID可能通過執(zhí)行UUIDGEN.EXE或GUIDGEN.EXE產(chǎn)生。GUIDGEN是裝載Microsoft Visual Studio中的一個工具，它通常在C:\Program Files\Microsoft Visual Studio\Common\Tools\GUIDGEN.EXE。GUID分為三類，具體見下：n CLSID 是唯一地標識類或組件的GUID，傳統(tǒng)地，CLSID的一般形式為CLSID_，在本例中：
在MyProj_i.c中表示為
const CLSID CLSID_MyCom = {0xFEB7BDEF,0xFB6F,0x446B,{0xBE,0x31,0xDF,0x0A,0x3A,0xD3,0x91,0xBA}};
在MyProj.idl中表示為
[uuid(FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA),helpstring("MyCom Class")]coclass MyCom{[default] interface IMyCom;};在MyCom.rgs中表示為
HKCR
{
MyProj.MyCom.1 = s 'MyCom Class'{CLSID = s '{FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA}'}MyProj.MyCom = s 'MyCom Class'{CLSID = s '{FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA}'CurVer = s 'MyProj.MyCom.1'}NoRemove CLSID{ForceRemove {FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA} = s 'MyCom Class'{ProgID = s 'MyProj.MyCom.1'VersionIndependentProgID = s 'MyProj.MyCom'ForceRemove 'Programmable'InprocServer32 = s '%MODULE%'{val ThreadingModel = s 'Apartment'}'TypeLib' = s '{FE651184-11DE-4D01-BD69-B07DDFA12D0C}'}}}
n ProgID 顯然，上面的CLSID難以記憶且難以使用。ProgID是分配給對象的用戶友好名。ProgID不可能是單一的。每個ProgID映射到CLSID。命名習慣可以是..。在本例中：
在MyCom.rgs中可以看到，有這么兩句
…
ProgID = s 'MyProj.MyCom.1'VersionIndependentProgID = s 'MyProj.MyCom'…
通過分別地調(diào)用函數(shù)ProgIDFromCLSID和CLSIDFromProgID可以將ProgID轉(zhuǎn)換為CLSID和將CLSID轉(zhuǎn)換為ProgID。如在本示例中的客戶端程序中HRESULT hr=CoInitialize(NULL);
CLSID clsid;hr=CLSIDFromProgID(OLESTR("MyProj.MyCom"),&clsid);if(FAILED(hr)){AfxMessageBox("COM Failed");return;}調(diào)用函數(shù)CLSIDFromProgID把作為第一個參數(shù)的ProgID的CLSID存放到第二個參數(shù)中。
n IID 是唯一標識接口的GUID。按照慣例，IID的一般形式為IID_，在本例中：
在MyProj_i.c中表示為
const IID IID_IMyCom = {0x65460F9C,0x3BAB,0x4055,{0x88,0x5A,0x8E,0xD5,0x9F,0x5F,0xA9,0xB0}};
在MyProj.idl中表示為
[
object,uuid(65460F9C-3BAB-4055-885A-8ED59F5FA9B0),dual,helpstring("IMyCom Interface"),pointer_default(unique)]
interface IMyCom : IDispatch
{
[id(1), helpstring("method MyF1")] HRESULT MyF1();[id(2), helpstring("method MyF2")] HRESULT MyF2([in] BSTR str,[out, retval] int* val);[id(3), helpstring("method MyF3")] HRESULT MyF3([in] BSTR str,[out, retval] BSTR* retstr);[id(4), helpstring("method MyF4")] HRESULT MyF4([in] int x,[out, retval] int* val);};
n TypeLibID 是標識系統(tǒng)上的類型庫。按照慣例，TypeLibID的一般形式為LIBID_<組件工程名>Lib，在本例中：
在MyProj_i.c中表示為
const IID LIBID_MYPROJLib = {0xFE651184,0x11DE,0x4D01,{0xBD,0x69,0xB0,0x7D,0xDF,0xA1,0x2D,0x0C}};
在MyProj.idl中表示為
[
uuid(FE651184-11DE-4D01-BD69-B07DDFA12D0C),
version(1.0),
helpstring(“MyProj 1.0 Type Library”)
]
library MYPROJLib
{
importlib(“stdole32.tlb”);
importlib(“stdole2.tlb”);
};
在MyCom.rgs中也可以看到這么一句
‘TypeLib’ = s ‘{FE651184-11DE-4D01-BD69-B07DDFA12D0C}’
COM對象的注冊角色
如果COM組件用文件名裝載并且組件位置或名字變化了，客戶應(yīng)用程序?qū)⒉荒茉L問組件。文件名無法提供在一個系統(tǒng)上的不同的組件版本，因而造成了不同版本商之間的產(chǎn)品沖突。
COM通過借助標識符ID注冊系統(tǒng)注冊表中的COM組件的位置來處理這個問題。COM組件的ID必須保證是系統(tǒng)唯一的，以避免與不同產(chǎn)品的沖突，并且客戶可不必知道組件的物理位置而可以訪問組件，這也就是所謂的組件對客戶的透明化。
COM類注冊在HKEY_CLASSES_ROOT\CLSID主鍵下。對每個CLSID主鍵，有一個子鍵InprocServer32，這個子鍵的默認值為DLL的文件名。
組件可以使用regsver32程序注冊。這個程序提供進入注冊表的組件。DLL文件可以使用以下命令注冊：Regsver32 <DLL filename>為了注冊EXE文件，命令語法為：/regserver
注冊COM組件讀取的注冊文件是MyCom.rgs
在本例中，注冊表的結(jié)構(gòu)為(紅色為CLSID，綠色為IID，藍色為LIBID)HKEY_CLASSES_ROOT\CLSID{FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA}
默認MyCom Class\InprocServer32
默認C:\MyProj\Debug\MyProj.dll
Apartment ThreadingModel
\ProgID
默認MyProj.MyCom.1
\Programmable
\TypeLib
默認{FE651184-11DE-4D01-BD69-B07DDFA12D0C}
\VersionIndependentProgID
默認MyProj.MyCom
HKEY_CLASSES_ROOT\MyProj.MyCom
\CLSID
默認{FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA}
\CurVer
默認MyProj.MyCom.1
HKEY_CLASSES_ROOT\MyProj.MyCom.1\CLSID
默認{FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA}
HKEY_CLASSES_ROOT\Interface\{65460F9C-3BAB-4055-885A-8ED59F5FA9B0}默認IMyCom\ProxyStubClsid
\ProxyStubClsid32
\TypeLib
默認{FE651184-11DE-4D01-BD69-B07DDFA12D0C}
Version 1.0
HKEY_CLASSES_ROOT\TypeLib\{FE651184-11DE-4D01-BD69-B07DDFA12D0C}\1.0
默認MyProj 1.0 Type Library\1.0\0
\1.0\0\win32默認C:\MyProj\Debug\MyProj.dll\1.0\FLAGS
\1.0\HELPDIR
默認C:\MyProj\Debug\接口類型
完整的COM編程系統(tǒng)是基于接口的。接口可以分為以下幾類：n 標準接口 由COM系統(tǒng)提供的接口
n 自定義接口 由開發(fā)者創(chuàng)建的接口
大多數(shù)由標準接口實現(xiàn)的方法被系統(tǒng)調(diào)用。這樣的標準接口有IUnknown、IDispatch、IClassFactory、IOle、IDateObject、IStream、IStorage…自定義接口的目的是提供更多的功能給用戶。標準接口由COM系統(tǒng)提供的不同的標準接口有：n IUnknown IUnknown 是所有接口的基接口。甚至自定義接口也執(zhí)行IUnknown。 所有的COM組件都必須實現(xiàn)這個接口。IUnknown 用于組件對象的生命周期管理。它也可以查詢被組件對象使用的其他接口。
下面的等式闡明了C++對象和COM對象之間的關(guān)系：
C++對象+ IUnknown=COM對象
IUnknown接口用于組件對象的生命周期管理，它執(zhí)行以下方法實現(xiàn)這個功能
n AddRef
n Release
組件對象可以被多個應(yīng)用程序使用，每次執(zhí)行應(yīng)用程序，需要將組件裝載進內(nèi)存，在32位Windows如Windows NT，每次應(yīng)用程序請求組件時，組件的拷貝則映射到應(yīng)用程序的地址空間并增加引用計數(shù)；類似的，每次應(yīng)用程序和組件斷開連接，則減小引用計數(shù)。操作系統(tǒng)維護著組件對象存在的連接計數(shù)。當計數(shù)下降為0，則暗示沒有應(yīng)用程序訪問組件并銷毀組件。
組件的引用計數(shù)使用函數(shù)AddRef和Release維護。AddRef增加計數(shù)；而Release負責減小計數(shù)。
IUnknown還有一個稱為QueryInterface的函數(shù)，它提供了所支持接口的列表。QueryInterface方法帶有兩個參數(shù)，第一個是一個標識所需要接口的接口標識符，第二個是QueryInterface存放接口地址的指針。因此，QueryInterface用來提供接口的指針來訪問組件的功能。
n IDispatch 當客戶端正常時，腳本語言或Visual Basic應(yīng)用程序調(diào)用組件對象的函數(shù)，IDispatch接口查詢函數(shù)的地址并執(zhí)行它。當組件相互調(diào)用時就使用IDispatch。
IDispatch接口是為那些需要和客戶特別是Visual Basic和腳本語言等不支持指針的客戶相互作用的組件實現(xiàn)的。考慮一個實例，Visual Basic應(yīng)用程序在Microsoft Access數(shù)據(jù)庫中存儲數(shù)據(jù)并使用Microsoft Excel創(chuàng)建圖表。這里，Visual Basic和Microsoft Access數(shù)據(jù)庫組件及Microsoft Excel圖表組件相互作用。這只有所有組件都實現(xiàn)了IDispatch接口才可能。
IDispatch接口是用來暴露組件功能的標準接口。但是它由于需依次調(diào)用系統(tǒng)函數(shù)而增加了系統(tǒng)的開銷。
n IClassFactory IClassFactory接口用于創(chuàng)建新的COM對象的實例。
到現(xiàn)在，你已經(jīng)熟悉組件的不同類型，即進程內(nèi)、本地和遠程的。假設(shè)你的組件是一個進程內(nèi)組件，你如何創(chuàng)建類的一個實例呢?答案是C++的new操作符。但是如果組件是本地的或是遠程的呢?那么，顯然new操作符不是答案。
COM對這個問題的答案是IClassFactory接口。
IClassFactory接口是特定設(shè)計用來當實現(xiàn)時創(chuàng)建另一個本地類或遠程類的實例的接口。
IClassFactory接口有CreateInstance和LockServer兩個方法。
CreateInstance方法實際上創(chuàng)建COM對象的實例。
LockServer方法用來保持組件在內(nèi)存中以致允許更快地創(chuàng)建實例。
n IOle IOleObject是實現(xiàn)OLE對象嵌套的主要接口。 IOleLink是使用OLE對象鏈接的主要接口。
n IDataObject 用于實現(xiàn)拖放式功能的接口。
n IStream和IStorage IStream和IStorage接口用于創(chuàng)建和管理存儲對象。這些接口典型用于數(shù)據(jù)來自多個源的OLE應(yīng)用程序。
IDataObject、IStream和IStorage三個接個均使用統(tǒng)一數(shù)據(jù)傳輸協(xié)議(UDT)，它描述了通過不同類型的應(yīng)用程序的交換標準。
小結(jié)
為什么需要組件對象模型COM?
COM組件是執(zhí)行特定操作的程序或二進制對象。COM為開發(fā)組件定義了標準、組件交互、協(xié)議標準以及組件的物理結(jié)構(gòu)來確保組件的互操作性。COM規(guī)范在COM運行時間庫中體現(xiàn)，它提供了在進程中、進程外及跨網(wǎng)絡(luò)的調(diào)用組件的能力。
COM的工作原理是什么?
COM允許你創(chuàng)建獨立的、可重用的、共同聯(lián)合形成應(yīng)用程序的組件。在COM中，組件之間的互操作是基于客戶/服務(wù)器模型的。組件對象是高度封裝的。組件對象的內(nèi)部實現(xiàn)對用戶是完全隱藏的。每個組件都有接口，接口是唯一的可以訪問組件對象功能的方法。
接口的特征是什么?
接口沒有任何實現(xiàn)，所以所有接口不能被實例化。接口是非版本化的并且不可改變。
什么是UUID/GUID?
當開發(fā)了組件并全局使用它時，它使用所謂的通用唯一標識行UUID來唯一標識組件。在COM中，UUID是指全局唯一標識符GUID。GUID分為CLSID、IID和LIBID三類。
對組件的十一個文件的剖析
一、stdafx.h
代碼選取
…
#define STRICT
#ifndef _WIN32_WINNT
#define _WIN32_WINNT 0x0400
#endif
#define _ATL_APARTMENT_THREADED
#include <afxwin.h>
#include <afxdisp.h>
#include <atlbase.h>
//You may derive a class from CComModule and use it if you want to override
//something, but do not change the name of _Module
extern CComModule _Module;
#include <atlcom.h>
…
代碼剖析
n 包含了ATL頭文件
#include <atlbase.h>
#include <atlcom.h>
n 兩個聲明
#define _ATL_APARTMENT_THREADED
定義了將成為apartment模型的DLL默認線程模型。
_Module是CComModule類型的對象，CComModule實現(xiàn)了COM服務(wù)器的基本功能，實現(xiàn)并提供了諸如注冊、實例化所支持對象以及通過對象映射管理生命周期等服務(wù)。注意因為它通過ATL頭文件所引用，所以CComModule對象必須是全局的且必須命名為_Module。
另外，這個類也是ATL的中心，正如主函數(shù)對任何程序的入口點(C/C++)，這個類的模塊對象處理幾個任務(wù)，如：服務(wù)器鎖計數(shù)、注冊本地服務(wù)器的類工廠、根據(jù)注冊表注冊和反注冊。
二、stdafx.cpp
…
#ifdef _ATL_STATIC_REGISTRY
#include <statreg.h>
#include <statreg.cpp>
#endif
#include <atlimpl.cpp>
三、MyProj.def輸出定義文件
代碼選取; MyProj.def : Declares the module parameters.
LIBRARY “MyProj.DLL”
EXPORTS
DllCanUnloadNow @1 PRIVATEDllGetClassObject @2 PRIVATEDllRegisterServer @3 PRIVATEDllUnregisterServer @4 PRIVATE代碼剖析
也稱模塊定義文件，只有進程內(nèi)服務(wù)器DLL才產(chǎn)生，它提供了被鏈接程序的信息(DLL文件的名字)
四、MyProj.tlb類型庫
編繹后生成，客戶端使用時用#import方式導入之。
五、MyProj.idl接口定義語言文件
代碼選取…
import “oaidl.idl”; //此文件包括IDispatch接口的定義，import相當于#include
import “ocidl.idl”;
[object,uuid(65460F9C-3BAB-4055-885A-8ED59F5FA9B0),dual,helpstring("IMyCom Interface"),pointer_default(unique)]interface IMyCom : IDispatch{[id(1), helpstring("method MyF1")] HRESULT MyF1();[id(2), helpstring("method MyF2")] HRESULT MyF2([in] BSTR str,[out, retval] int* val);[id(3), helpstring("method MyF3")] HRESULT MyF3([in] BSTR str,[out, retval] BSTR* retstr);[id(4), helpstring("method MyF4")] HRESULT MyF4([in] int x,[out, retval] int* val);};[
uuid(FE651184-11DE-4D01-BD69-B07DDFA12D0C),version(1.0),helpstring("MyProj 1.0 Type Library")]
library MYPROJLib
{
importlib("stdole32.tlb");importlib("stdole2.tlb");[uuid(FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA),helpstring("MyCom Class")]coclass MyCom{[default] interface IMyCom;};};
代碼剖析
IDL文件由三部分組成，每部分又都由一對中括號和一對大括號組成。每部分也都包含一個UUID來唯一的標識自己
n 接口部分：COM接口定義
[
object,uuid(65460F9C-3BAB-4055-885A-8ED59F5FA9B0), //接口唯一標識符(GUID/IID)dual, //表示客戶機可用兩種方法訪問這個接口，一種是支持指針的非腳本語言，如VC；一種是非腳本語言，如VB、ASPhelpstring("IMyCom Interface"), //將提示字符串與此接口建立聯(lián)系pointer_default(unique) //指定除參數(shù)表中所列屬性之外所有指針的缺省特征,unique表示指針可以是NULL，但不支持別名]interface IMyCom : IDispatch{[id(1), helpstring("method MyF1")] HRESULT MyF1();[id(2), helpstring("method MyF2")] HRESULT MyF2([in] BSTR str,[out, retval] int* val);[id(3), helpstring("method MyF3")] HRESULT MyF3([in] BSTR str,[out, retval] BSTR* retstr);[id(4), helpstring("method MyF4")] HRESULT MyF4([in] int x,[out, retval] int* val);};//接口中的方法n 類型庫部分
[
uuid(FE651184-11DE-4D01-BD69-B07DDFA12D0C),version(1.0),helpstring("MyProj 1.0 Type Library")]
library MYPROJLib
{
importlib("stdole32.tlb");importlib("stdole2.tlb");<組件類部分>};
n 組件類部分(組件類嵌套在類型庫里面)
[uuid(FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA),helpstring("MyCom Class")]coclass MyCom{[default] interface IMyCom;};手工為接口添加一個方法，該修改哪些地方?
假設(shè)組件類名叫CMyCom,接口叫IMyCom，要加入的方法是MyF5。首先在IDL文件中找到接口IMyCom的定義，在其中加入如下方法定義：
[id(5), helpstring("method MyF5")] HRESULT MyF1([out,retval] VARIANT_BOOL *ret);注意：id中的數(shù)字不要和已經(jīng)存在的id重復(fù)。
其次，在CMyCom的類定義頭文件中加入如下成員函數(shù)聲明：
public:
STDMETHOD(MyF5)(/[out, retval]/ VARIANT_BOOL *ret);
最后，在CMyCom類的實現(xiàn)Cpp文件中加入函數(shù)的實現(xiàn)：
STDMETHODIMP CMyCom::MyF5(VARIANT_BOOL *ret)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())// TODO: Add your implementation code here*ret = VARAINT_TRUE;return S_OK;}
六、MyCom.h
代碼選取// MyCom.h : Declaration of the CMyCom
#ifndef _MYCOM_H
#define _MYCOM_H
#include “resource.h” // main symbols
// CMyCom
class ATL_NO_VTABLE CMyCom :
public CComObjectRootEx<CComSingleThreadModel>,public CComCoClass<CMyCom, &CLSID_MyCom>,public IDispatchImpl<IMyCom, &IID_IMyCom, &LIBID_MYPROJLib>{
public:
CMyCom(){}DECLARE_REGISTRY_RESOURCEID(IDR_MYCOM)
DECLARE_PROTECT_FINAL_CONSTRUCT()
BEGIN_COM_MAP(CMyCom)
COM_INTERFACE_ENTRY(IMyCom)COM_INTERFACE_ENTRY(IDispatch)END_COM_MAP()
// IMyCom
public:
STDMETHOD(MyF4)(/*[in]*/ int x,/*[out, retval]*/ int* val);STDMETHOD(MyF3)(/*[in]*/ BSTR str,/*[out, retval]*/ BSTR* retstr);STDMETHOD(MyF2)(/*[in]*/ BSTR str,/*[out, retval]*/ int* val);STDMETHOD(MyF1)();};
#endif //_MYCOM_H
代碼剖析
n CComObjectRootEx
是每個COM組件必須繼承的類之一，這個類管理組件的引用計數(shù)。由于引用計數(shù)是很重要的，所有的ATL COM組件必須從CComObjectRootEx繼承。
n CComCoClass
如果一個類從CComCoClass繼承，ATL確保了這個類一定是默認的類工廠對象。ATL支持一個默認的工廠實現(xiàn)，并且有使得可以恢復(fù)對象CLSID和設(shè)置錯誤信息的函數(shù)。
n BEGIN_COM_MAP(CMyCom)
COM_INTERFACE_ENTRY(IMyCom)COM_INTERFACE_ENTRY(IDispatch)END_COM_MAP()
BEGIN_COM_MAP和END_COM_MAP這兩個宏定義了COM的接口映射。列在映射中的接口是QueryInterface可以返回的接口指針的接口。
n 另外CComObject類實現(xiàn)了屬于IUnKnown接口的方法。這個類一直是最大的派生類，它提供了聚合和鎖模型的選擇。但是，對QueryInterface、AddRef、Release的調(diào)用會委派給CComObjectRootEx
n 還有，我們在這里看到了和接口定義語言文件模樣差不多的四個函數(shù)的聲明
STDMETHOD(MyF4)(/*[in]*/ int x,/*[out, retval]*/ int* val);STDMETHOD(MyF3)(/*[in]*/ BSTR str,/*[out, retval]*/ BSTR* retstr);STDMETHOD(MyF2)(/*[in]*/ BSTR str,/*[out, retval]*/ int* val);STDMETHOD(MyF1)();那么它們兩者間有什么意義區(qū)別呢?在接口定義語言文件里有如下接口函數(shù)(方法)interface IMyCom : IDispatch{[id(1), helpstring("method MyF1")] HRESULT MyF1();[id(2), helpstring("method MyF2")] HRESULT MyF2([in] BSTR str,[out, retval] int* val);[id(3), helpstring("method MyF3")] HRESULT MyF3([in] BSTR str,[out, retval] BSTR* retstr);[id(4), helpstring("method MyF4")] HRESULT MyF4([in] int x,[out, retval] int* val);};這都是對接口而言的，接口只是包含了這些函數(shù)的集合，它并沒有實現(xiàn)這些函數(shù)。函數(shù)是通過組件類(CMyCom class)實現(xiàn)的。組件類實例化時生成組件對象。七、MyCom.cpp
代碼選取// MyCom.cpp : Implementation of CMyCom
#include “stdafx.h”
#include “MyProj.h”
#include “MyCom.h”
// CMyCom
STDMETHODIMP CMyCom::MyF1()
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())// TODO: Add your implementation code hereAfxMessageBox("歡迎使用我的組件");return S_OK;}
…
代碼剖析
組件類對接口函數(shù)的具體實現(xiàn)。
八、MyProj.h
代碼選取略代碼剖析虛函數(shù)表等內(nèi)部定義九、MyProj.cpp
代碼選取// MyProj.cpp : Implementation of DLL Exports.
// Note: Proxy/Stub Information
// To build a separate proxy/stub DLL,
// run nmake -f MyProjps.mk in the project directory.
#include “stdafx.h”
#include “resource.h”
#include <initguid.h>
#include “MyProj.h”
#include “MyProj_i.c”
#include “MyCom.h”
CComModule _Module;//
BEGIN_OBJECT_MAP(ObjectMap)
OBJECT_ENTRY(CLSID_MyCom, CMyCom)//對象MAP，對每個服務(wù)器實現(xiàn)有組件都有一個入口
END_OBJECT_MAP()
class CMyProjApp : public CWinApp
{
public:
// Overrides
// ClassWizard generated virtual function overrides//{{AFX_VIRTUAL(CMyProjApp)public:virtual BOOL InitInstance();virtual int ExitInstance();//}}AFX_VIRTUAL//{{AFX_MSG(CMyProjApp)// NOTE - the ClassWizard will add and remove member functions here.// DO NOT EDIT what you see in these blocks of generated code !//}}AFX_MSGDECLARE_MESSAGE_MAP()};
BEGIN_MESSAGE_MAP(CMyProjApp, CWinApp)
//{{AFX_MSG_MAP(CMyProjApp)// NOTE - the ClassWizard will add and remove mapping macros here.// DO NOT EDIT what you see in these blocks of generated code!//}}AFX_MSG_MAPEND_MESSAGE_MAP()
CMyProjApp theApp;
BOOL CMyProjApp::InitInstance()
{
_Module.Init(ObjectMap, m_hInstance, &LIBID_MYPROJLib);return CWinApp::InitInstance();}
int CMyProjApp::ExitInstance()
{
_Module.Term();return CWinApp::ExitInstance();}
// Used to determine whether the DLL can be unloaded by OLE
STDAPI DllCanUnloadNow(void)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState());return (AfxDllCanUnloadNow()==S_OK && _Module.GetLockCount()==0) ? S_OK : S_FALSE;}
// Returns a class factory to create an object of the requested type
STDAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID* ppv)
{
return _Module.GetClassObject(rclsid, riid, ppv);}
// DllRegisterServer - Adds entries to the system registry
STDAPI DllRegisterServer(void)
{
// registers object, typelib and all interfaces in typelibreturn _Module.RegisterServer(TRUE);}
// DllUnregisterServer - Removes entries from the system registry
STDAPI DllUnregisterServer(void)
{
return _Module.UnregisterServer(TRUE);}
十、MyProj_i.c
代碼選取/* this file contains the actual definitions of */
/* the IIDs and CLSIDs */
/* link this file in with the server and any clients */
/* File created by MIDL compiler version 5.01.0164 */
/* at Sun Nov 30 23:39:23 2003
*/
/* Compiler settings for C:\MyProj\MyProj.idl:
Oicf (OptLev=i2), W1, Zp8, env=Win32, ms_ext, c_exterror checks: allocation ref bounds_check enum stub_data*/
//@@MIDL_FILE_HEADING( )
#ifdef __cplusplus
extern “C”{
#endif
#ifndef IID_DEFINED
#define IID_DEFINED
typedef struct _IID
{
unsigned long x;unsigned short s1;unsigned short s2;unsigned char c[8];} IID;
#endif // IID_DEFINED
#ifndef CLSID_DEFINED
#define CLSID_DEFINED
typedef IID CLSID;
#endif // CLSID_DEFINED
const IID IID_IMyCom = {0x65460F9C,0x3BAB,0x4055,{0x88,0x5A,0x8E,0xD5,0x9F,0x5F,0xA9,0xB0}};
const IID LIBID_MYPROJLib = {0xFE651184,0x11DE,0x4D01,{0xBD,0x69,0xB0,0x7D,0xDF,0xA1,0x2D,0x0C}};
const CLSID CLSID_MyCom = {0xFEB7BDEF,0xFB6F,0x446B,{0xBE,0x31,0xDF,0x0A,0x3A,0xD3,0x91,0xBA}};
#ifdef __cplusplus
}
#endif
十一、MyCom.rgs
代碼選取HKCR
{
MyProj.MyCom.1 = s 'MyCom Class'{CLSID = s '{FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA}'}MyProj.MyCom = s 'MyCom Class'{CLSID = s '{FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA}'CurVer = s 'MyProj.MyCom.1'}NoRemove CLSID{ForceRemove {FEB7BDEF-FB6F-446B-BE31-DF0A3AD391BA} = s 'MyCom Class'{ProgID = s 'MyProj.MyCom.1'VersionIndependentProgID = s 'MyProj.MyCom'ForceRemove 'Programmable'InprocServer32 = s '%MODULE%'{val ThreadingModel = s 'Apartment'}'TypeLib' = s '{FE651184-11DE-4D01-BD69-B07DDFA12D0C}'}}}
代碼剖析
組件注冊時用，在這里你可以更改組件的在注冊時存放在注冊表中的名稱及組件的其他相關(guān)注冊信息。
Visual Basic、Visual C++組件調(diào)用相互通
n Visual Basic調(diào)用Visual Basic組件
n Visual C++調(diào)用Visual Basic組件
n Visual Basic調(diào)用Visual C++組件
n Visual C++調(diào)用Visual C++組件
n 編寫Visual Basic組件
n 組件功能：完成三種類型的信用卡號碼的合法性檢查
n 編寫步驟：
Option Explicit
Public Function fnValidateCreditCard(ByVal strCCNumber As String, ByVal strCCType As String) As Boolean
Dim bValid As BooleanstrCCType = Trim(strCCType)Select Case UCase(strCCType)Case "VISA"strCCType = "V"Case "MASTER"strCCType = "M"Case "American"strCCType = "A"End SelectIf fnPrefixCheck(strCCNumber, strCCType) And fnLengthCheck(strCCNumber, strCCType) And fnLuhnCheck(strCCNumber, strCCType) ThenbValid = TrueElsebValid = FalseEnd IffnValidateCreditCard = bValidEnd Function
Private Function fnPrefixCheck(strCCNumber As String, strCCType As String) As Boolean
Dim bValidPrefix As BooleanSelect Case UCase(strCCType)Case "V"If InStr(1, strCCNumber, "4") = 1 ThenbValidPrefix = TrueEnd IfCase "M"If InStr(1, strCCNumber, "51") = 1 Or _InStr(1, strCCNumber, "52") = 1 Or _InStr(1, strCCNumber, "53") = 1 Or _InStr(1, strCCNumber, "54") = 1 Or _InStr(1, strCCNumber, "55") = 1 ThenbValidPrefix = TrueEnd IfCase "A"If InStr(1, strCCNumber, "34") = 1 Or _InStr(1, strCCNumber, "37") ThenbValidPrefix = TrueEnd IfEnd SelectfnPrefixCheck = bValidPrefixEnd Function
Private Function fnLengthCheck(strCCNumber As String, strCCType As String) As Boolean
Dim bValidLength As BooleanSelect Case UCase(strCCType)Case "V" 'A visa card has a 13 digit or a 16 digit numberIf Len(strCCNumber) = 13 Or Len(strCCNumber) = 16 ThenbValidLength = TrueEnd IfCase "M" 'A mastercard has a 16 digit numberIf Len(strCCNumber) = 16 ThenbValidLength = TrueEnd IfCase "A" 'American Express has a 15 digit numberIf Len(strCCNumber) = 15 ThenbValidLength = TrueEnd IfEnd SelectfnLengthCheck = bValidLengthEnd Function
Private Function fnLuhnCheck(strCCNumber As String, strCCType As String) As Boolean
Dim bValidLuhn As BooleanDim strRev As StringDim strCh As StringDim intNumber As IntegerDim strNumberFinal As StringDim intSum As IntegerDim intTemp As IntegerstrRev = StrReverse(strCCNumber)For intTemp = 1 To Len(strRev)strCh = Mid(strRev, intTemp, 1)intNumber = CInt(strCh)If intTemp Mod 2 = 0 ThenintNumber = intNumber * 2If intNumber > 9 ThenintNumber = intNumber - 9End IfEnd IfstrNumberFinal = strNumberFinal & intNumberNext intTempFor intTemp = 1 To Len(strNumberFinal)intSum = intSum + Mid(strNumberFinal, intTemp, 1)Next intTempIf intSum Mod 10 = 0 ThenbValidLuhn = TrueElsebValidLuhn = FalseEnd IffnLuhnCheck = bValidLuhnEnd Function
n Visual Basic調(diào)用Visual Basic組件
n 編寫步驟：
Private Sub Command1_Click()
Dim comobj As New ValidateCardServer.IValidateCard
If comobj.fnValidateCreditCard(Text1.Text, Text2.Text) = True Then
MsgBox "valid card"Else
MsgBox "invalid card"End If
End Sub
n 代碼測試：在信用卡號碼中輸入4567890123456783，在信用卡類型中輸入visa，點擊確定，彈出"valid card"的提示框；在信用卡號碼中輸入4567890123456789，在信用卡類型中輸入visa，點擊確定按鈕，彈出"invalid card"的提示框。
Visual C++調(diào)用Visual Basic組件
編寫步驟：
n 使用Visual C++創(chuàng)建一個基于對話框的應(yīng)用程序，工程名為VCTestVBComProj，同上面VBTestVBComProj工程一樣，在對話框上面放置兩個文本框和一個確定按鈕。
n 在客戶端中導入服務(wù)器的類型庫。導入服務(wù)器的類型庫將允許你在客戶中使用服務(wù)器方法和屬性。
現(xiàn)在，為了訪問服務(wù)器的功能，它的類型庫應(yīng)被導入客戶的工作空間。這相當于在Visual Basic環(huán)境中從訪問COM組件的工程中設(shè)置組件引用。在MFC或C++中，這使用#import語句完成。
#import關(guān)鍵字在帶有擴展名tlh(類型庫頭文件)的文件中創(chuàng)建了包裝類的頭，以及在另一個帶有擴展名tli(類型庫實現(xiàn)文件)的文件中實現(xiàn)了它。這些文件在客戶工作空間輸出目錄中顯示，通常是在當前工作空間的Debug目錄下。
包裝類是#import語句創(chuàng)建的類，它封裝了服務(wù)器信息。它用來訪問客戶定義在服務(wù)器中的屬性和方法。它顯示在tlh文件中在前面用關(guān)鍵字namespace的一塊區(qū)域。包裝類的名字是服務(wù)器空間名字插入關(guān)鍵字Lib。如果你的服務(wù)器組件名字是Server，那它的名字是SERVERLib。注意：這里講的是針對Visual C++創(chuàng)建的組件，而不是Visual Basic創(chuàng)建的組件。
2-1在 StdAfx.h 文件中加入代碼:
// stdafx.h : include file for standard system include files,
// or project specific include files that are used frequently, but
// are changed infrequently
//
#if !defined(AFX_STDAFX_H__A07C8507_082B_4B60_9880_AEB5ADB6D68A__INCLUDED_)
#define AFX_STDAFX_H__A07C8507_082B_4B60_9880_AEB5ADB6D68A__INCLUDED_
#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000
#define VC_EXTRALEAN // Exclude rarely-used stuff from Windows headers
#include <afxwin.h> // MFC core and standard components
#include <afxext.h> // MFC extensions
#include <afxdisp.h> // MFC Automation classes
#include <afxdtctl.h> // MFC support for Internet Explorer 4 Common Controls
#ifndef _AFX_NO_AFXCMN_SUPPORT
#include <afxcmn.h> // MFC support for Windows Common Controls
#endif // _AFX_NO_AFXCMN_SUPPORT
#import “…\VBCom\ValidateCardServer.dll”//如果你的服務(wù)器組件是用Visual C++創(chuàng)建，那么你應(yīng)該導入有.tlb擴展名的類型庫文件來代替.dll文件。具體示例見Developing COM Components using VC-ATL(1)
//{{AFX_INSERT_LOCATION}}
// Microsoft Visual C++ will insert additional declarations immediately before the previous line.
#endif // !defined(AFX_STDAFX_H__A07C8507_082B_4B60_9880_AEB5ADB6D68A__INCLUDED_)
2-2編譯 StdAfx.cpp，當編繹#import 語句結(jié)構(gòu)時編繹器產(chǎn)生包裝類，這個包裝類將封裝服務(wù)器組件的功能以致它能被客戶訪問。這個信息將在客戶工程空間中輸出目錄中創(chuàng)建的兩個文件：類型庫頭文件(tlh)和類型庫實現(xiàn)文件(tli)。包裝類的名稱將是默認的服務(wù)器名。所以，在本例中，它的名字將是ValidateCardServer。
如果服務(wù)器組件是用Visual C++創(chuàng)建，那么包裝類的名字將是大寫的服務(wù)器名后面跟上Lib。如果Visual C++創(chuàng)建的服務(wù)器組件有一個名字ValidateCardServer，那么包裝類的名字將是VALIDATECARDSERVERLib。
2-3現(xiàn)在你必須從對話框訪問服務(wù)器組件的功能。為此，在VCTestVBComProjDlg.cpp文件中增加如下的語句：
// VCTestVBComProjDlg.cpp : implementation file
//
#include “stdafx.h”
#include “VCTestVBComProj.h”
#include “VCTestVBComProjDlg.h”
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = FILE;
#endif
using namespace ValidateCardServer;
/
// CAboutDlg dialog used for App About
class CAboutDlg : public CDialog
{
public:
CAboutDlg();…
n 初始化COM庫。應(yīng)用程序必須在調(diào)用COM函數(shù)前初始化COM庫。
因為客戶和組件間的交互是通過COM庫，所以必須初始化COM庫。為了初始化COM庫，可調(diào)用CoInitialize函數(shù)。CoInitialize函數(shù)的返回值是HRESULT數(shù)據(jù)類型，它暗示了該操作是成功還是失敗。返回值可以是S_OK或S_FALSE。
語法：
HRESULT CoInitialize(NULL);
n 獲得服務(wù)器的CLSID。客戶應(yīng)用程序只有在獲得COM服務(wù)器組件的CLSID后才能實例化服務(wù)器。
為了創(chuàng)建服務(wù)器的實例，必須獲得服務(wù)器的CLSID。因為COM的CLSID很難記住，所以你必須使用可讀的ProgID獲得CLSID。這通過調(diào)用CLSIDFromProgID函數(shù)完成。這個函數(shù)帶有兩個參數(shù)：輸入?yún)?shù)ProgID和輸出參數(shù)CLSID。
語法：
HRESULT CLSIDFromProgID(LPCOLESTR lpszProgID,LPCLSID pclsid);
n 創(chuàng)建COM服務(wù)器組件的實例。創(chuàng)建COM服務(wù)器組件的實例并返回所需接口的指針。
一旦獲得組件的CLSID，它可以用來創(chuàng)建COM服務(wù)器的實例。使用CoCreateInstance函數(shù)來創(chuàng)建服務(wù)器組件的實例。COM將不提供實例化對象的指針，COM只提供接口的指針。
語法：
HRESULT CoCreateInstance(
REFCLSID rclsid, //要創(chuàng)建組件的CLSID
LPUNKNOWN punkouter,//當對象支持聚合時使用，否則為NULL
DWORD dwclsContext, //對象初化化環(huán)境(進程內(nèi)、進程外或遠程)
REFIID riid, //要獲得類的接口的ID
LPVOID *ppv //[out]所需求接口的指針
);
Class環(huán)境
說明
CLSCTX_INPROC_SERVER
指明進程內(nèi)服務(wù)器。
CLSCTX_INPROC_HANDLER
指明進程內(nèi)服務(wù)器的特定類型，在客戶進程中運行但類的實例被遠程訪問。
CLSCTX_LOCAL_SERVER
指明了本地(進程外)服務(wù)器。
CLSCTX_REMOTE_SERVER
指明了遠程服務(wù)器，使用CoCreateInstanceEx函數(shù)。
CLSCTX_SERVER
指明如果不是特定的組件類型。這個值找回進程內(nèi)、進程外、遠程中的第一個變量。
n 使用COM對象。在獲得接口指針之后，客戶應(yīng)用程序能調(diào)用COM服務(wù)器對象的方法和屬性。
CoCreateInstance函數(shù)返回一個組件的接口指針。使用這個指針，可以訪問服務(wù)器的屬性和方法。n 終止COM庫。在釋放COM對象后，客戶應(yīng)用程序應(yīng)指示不再需要已初始化的COM庫。
在釋放COM對象的實例后，初始化的COM庫不再需要。為了釋放初始化的COM庫，可調(diào)用函數(shù)CoUninitialize。
語法：
void CoUninitialize();
n 附完整代碼
void CVCTestVBComProjDlg::OnButton1(){
// TODO: Add your control notification handler code hereHRESULT hr=CoInitialize(NULL);//step 3CLSID clsid;hr=CLSIDFromProgID(OLESTR("ValidateCardServer.IValidateCard"),&clsid);//step 4_IValidateCard * cardptr;hr=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,__uuidof(_IValidateCard),(LPVOID *)&cardptr);if(FAILED(hr)){AfxMessageBox("Server Creation Failed");return;}//step 5char cCardNum[20];GetDlgItemText(IDC_EDIT1,cCardNum,20);char cCardType[10];GetDlgItemText(IDC_EDIT2,cCardType,10);_bstr_t bstCardNum(cCardNum),bstCardType(cCardType);long lStatus;lStatus=cardptr->fnValidateCreditCard(bstCardNum,bstCardType);if(lStatus==-1)AfxMessageBox("valid card");elseAfxMessageBox("invalid card");//step 6 CoUninitialize();//step 7}
n 編寫Visual C++組件
確定創(chuàng)建服務(wù)器組件的最有效的工具
當你著手創(chuàng)建COM組件時，你可以選擇與Visual Basic、Delphi、MFC和ATL不同的工具。讓我們比較一下每個工具，來揭露它們各自的優(yōu)點和缺點。
當著手寫COM類時，你可以有幾種選擇，你可以選擇用C++滿足COM。這種選擇提供了最大的靈活性但是很枯燥。另外，你可以選擇Visual C++提供的兩種主要的框架來寫COM：MFC和ATL。
MFC使用文檔視圖體系結(jié)構(gòu)設(shè)計良好的開發(fā)基于Windows的應(yīng)用程序。使用MFC設(shè)計基于Windows應(yīng)用程序要求運行時間庫MFC42.DLL來執(zhí)行。當用于開發(fā)確定類型的應(yīng)用程序時，MFC遇到要求大的運行時間庫開銷。MFC有利于像基于Windows的單層應(yīng)用程序、請求許多GUI客戶端的應(yīng)用程序、ActiveX控件和OLE文檔的開發(fā)。對COM的支持是后來增加的并且依靠它的文檔視圖體系結(jié)構(gòu)。雖然Visual C++向?qū)沟糜肕FC創(chuàng)建組件容易很多，但于框架結(jié)構(gòu)先天設(shè)計缺陷，所以它并不是一種靈活的方法。而且，組件以體積大和要求擴展DLL而告終。
相反，ATL是針對COM來設(shè)計的。此外，ATL提供像聚合和包容不同的類合成技術(shù)的完全支持。ATL使用C++模板類的多繼承技術(shù)來實現(xiàn)COM類。ATL允許COM組件、自動化服務(wù)器和ActiveX控件的創(chuàng)建。使用ATL創(chuàng)建的COM更小更快。ATL提供許多COM接口的本地支持和由Windows NT服務(wù)器支持的新線程模型。由于ATL主要使用模板的概念，創(chuàng)建的組件大小很小，并且運行期DLL很小并可動態(tài)加載。
所以，你應(yīng)用ATL創(chuàng)建COM。
組件功能：同上(編寫Visual Basic組件)。
組件將包含以下函數(shù)：ValidateCreditCard、PrefixCheck、LengthCheck、LuhnCheck。僅ValidateCreditCard可以被應(yīng)用程序調(diào)用來封裝組件的工作方式。
為了創(chuàng)建驗證信用卡的服務(wù)器組件，你需要執(zhí)行以下步驟：
啟動VC++6.0，從File菜單選項選中 New 菜單項，在出現(xiàn)的 New 對話框中選中 Projects 卡片，從顯示的工程類型中選中 ATL COM AppWizard。指定工程工作空間名，即在 Project Name 編輯框中輸入項目名ValidateCreditCardServer，以區(qū)別于Visual Basic組件工程ValidateCardServer。選擇合適的 Location 后，按確認按鈕進入下一個對話框：ATL COM Appwizard - step 1 of 1，在 Server Type 中選擇 Dynamic Link Library [ DLL ]，即進程內(nèi)服務(wù)器組件。選中 Support MFC 選項。在按下 Finish 和 Ok 按鈕后，一個組件的框架已經(jīng)建立。現(xiàn)在讓我們來看一下生成的文件的清單
n stdafx.h
n stdafx.cpp
n ValidateCreditCardServer.idl
n ValidateCreditCardServer.rc
n Resource.h
n ValidateCreditCardServer.def
n ValidateCreditCardServerps.def
n ValidateCreditCardServer.h
n ValidateCreditCardServer.cpp
n ValidateCreditCardServer.dsp
n ValidateCreditCardServer.dsw
n ValidateCreditCardServer.ncb
n ValidateCreditCardServerps.mk
n ValidateCreditCardServer.clw
ValidateCreditCardServer.cpp清單
// ValidateCreditCardServer.cpp : Implementation of DLL Exports.
// Note: Proxy/Stub Information
// To build a separate proxy/stub DLL,
// run nmake -f ValidateCreditCardServerps.mk in the project directory.
#include “stdafx.h”
#include “resource.h”
#include <initguid.h>
#include “ValidateCreditCardServer.h”
#include “ValidateCreditCardServer_i.c”
#include “ValidateCard.h”
CComModule _Module;
BEGIN_OBJECT_MAP(ObjectMap)
OBJECT_ENTRY(CLSID_ValidateCard, CValidateCard)
END_OBJECT_MAP()
class CValidateCreditCardServerApp : public CWinApp
{
public:
// Overrides
// ClassWizard generated virtual function overrides//{{AFX_VIRTUAL(CValidateCreditCardServerApp)public:virtual BOOL InitInstance();virtual int ExitInstance();//}}AFX_VIRTUAL//{{AFX_MSG(CValidateCreditCardServerApp)// NOTE - the ClassWizard will add and remove member functions here.// DO NOT EDIT what you see in these blocks of generated code !//}}AFX_MSGDECLARE_MESSAGE_MAP()};
BEGIN_MESSAGE_MAP(CValidateCreditCardServerApp, CWinApp)
//{{AFX_MSG_MAP(CValidateCreditCardServerApp)// NOTE - the ClassWizard will add and remove mapping macros here.// DO NOT EDIT what you see in these blocks of generated code!//}}AFX_MSG_MAPEND_MESSAGE_MAP()
CValidateCreditCardServerApp theApp;
BOOL CValidateCreditCardServerApp::InitInstance()
{
_Module.Init(ObjectMap, m_hInstance, &LIBID_VALIDATECREDITCARDSERVERLib);return CWinApp::InitInstance();}
int CValidateCreditCardServerApp::ExitInstance()
{
_Module.Term();return CWinApp::ExitInstance();}
/
// Used to determine whether the DLL can be unloaded by OLE
STDAPI DllCanUnloadNow(void)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState());return (AfxDllCanUnloadNow()==S_OK && _Module.GetLockCount()==0) ? S_OK : S_FALSE;}
/
// Returns a class factory to create an object of the requested type
STDAPI DllGetClassObject(REFCLSID rclsid, REFIID riid, LPVOID* ppv)
{
return _Module.GetClassObject(rclsid, riid, ppv);}
/
// DllRegisterServer - Adds entries to the system registry
STDAPI DllRegisterServer(void)
{
// registers object, typelib and all interfaces in typelibreturn _Module.RegisterServer(TRUE);}
/
// DllUnregisterServer - Removes entries from the system registry
STDAPI DllUnregisterServer(void)
{
return _Module.UnregisterServer(TRUE);}
從Insert菜單中選中 New ATL Object…菜單項，出現(xiàn) ATL Object Wizard 對話框。
在ATL Object Wizard中，在左邊的 Category 中選擇 Objects，右邊的 Objects 中選中 Simple Object 項。按 Next 按鈕。
在出現(xiàn)的 ATL Object Wizard 屬性對話框中 Names 卡片中的八個編輯框中左上方的 Short Name 編輯框中輸入短名ValidateCard ，其他七個編輯框的內(nèi)容會自動生成。在這里我們也對這一對話框的其他七個編輯框的內(nèi)容作一個詳細地剖析：
C++塊
Short Name：ValidateCard//用戶輸入
Class：CValidateCard//產(chǎn)生組件類的實現(xiàn)類的類名
.H File：ValidateCard.h//產(chǎn)生組件類的實現(xiàn)類的頭文件
.CPP File：ValidateCard.cpp//產(chǎn)生組件類的實現(xiàn)類的實現(xiàn)文件
COM塊
CoClass：ValidateCard//產(chǎn)生的組件類，區(qū)別于組件類的實現(xiàn)類
Interface：IValidateCard//創(chuàng)建組件類時，同時創(chuàng)建一個此組件類的一個用戶接口
Type：ValidateCard Class//組件類的類型
ProgID：ValidateCreditCardServer.ValidateCard// CLSIDFromProgID調(diào)用，用它得到CLSID
然后按確認按鈕退出。這將生成如上的信息并且在需要的文件中同樣地作一個登陸，特別是IDL文件。在這里我們比較一下創(chuàng)建組件前后的兩個版本的IDL文件。
創(chuàng)建組件前的ValidateCreditCardServer.idl文件，即創(chuàng)建應(yīng)用程序框架后的IDL文件。
// ValidateCreditCardServer.idl : IDL source for ValidateCreditCardServer.dll
//
// This file will be processed by the MIDL tool to
// produce the type library (ValidateCreditCardServer.tlb) and marshalling code.
import “oaidl.idl”;
import “ocidl.idl”;
[
uuid(B3404054-C33E-4931-B737-5783CEEFECDB),version(1.0),helpstring("ValidateCreditCardServer 1.0 Type Library")]
library VALIDATECREDITCARDSERVERLib
{
importlib("stdole32.tlb");importlib("stdole2.tlb");};
創(chuàng)建組件后的IDL文件
ValidateCreditCardServer.idl清單
import “oaidl.idl”;
import “ocidl.idl”;
[object,uuid(B1D1C73C-E340-4FDC-8734-92ECEC64DC4E),dual,helpstring("IValidateCard Interface"),pointer_default(unique)]interface IValidateCard : IDispatch{};[
uuid(B3404054-C33E-4931-B737-5783CEEFECDB),version(1.0),helpstring("ValidateCreditCardServer 1.0 Type Library")]
library VALIDATECREDITCARDSERVERLib
{
importlib("stdole32.tlb");importlib("stdole2.tlb");[uuid(C79635D2-7B86-4B20-A83C-0565DCA54C3C),helpstring("ValidateCard Class")]coclass ValidateCard{[default] interface IValidateCard;};};
文中黑體部分表示在框架中加入組件類后形成的代碼，在框架中加入組件類之前，只有類型庫部分，而在創(chuàng)建組件類后我們可以看到上面部分是一個組件類的用戶接口，下面部分是一個組件類，其嵌套在類型庫中。呵呵，三部分全到齊了。
另外，也說明一下VALIDATECREDITCARDSERVERLib這幾個字母的用處，大家想到?jīng)]有呀?呵呵，它就是在客戶端中使用名字空間時使用的呀。詳細請見Visual C++調(diào)用Visual C++組件。
要實現(xiàn)這一點，你必須增加檢驗信用卡有效性的函數(shù)。如何增加函數(shù)到你的組件，請按以下步驟操作：
在 VC++工作平臺的左邊的 Workspace 的 ClassView 卡片中找到接口 IValidateCard項，按右鍵，在出現(xiàn)的快捷菜單中選擇 Add Method …，出現(xiàn) Add Method to Interface 對話框，在對話框中輸入要增加的函數(shù)的函數(shù)名、參數(shù)和返回值類型。在這里，我們在Method Name中輸入
ValidateCreditCard
在Parameters中輸入
[in] BSTR bstrCCNo,[in]BSTR bstrCCType,[out,retval]long *val
然后，按確認按鈕退出。
類似地輸入以下三個函數(shù)
函數(shù)功能
Method Name
Parameters
檢驗信用卡的號碼是否合法
LuhnCheck
[in] BSTR bstrCCNo,[in]BSTR bstrCCType
檢驗信用卡的長度是否合法
LengthCheck
[in] BSTR bstrCCNo,[in]BSTR bstrCCType
檢驗信用卡的類型是否合法
PrefixCheck
[in] BSTR bstrCCNo,[in]BSTR bstrCCType
現(xiàn)在你可以看見為你的組件創(chuàng)建的接口定義語言文件的變化，你將在IDL文件ValidateCreditCardServer.idl中看到上面增加的所有函數(shù)的入口。
ValidateCreditCardServer.idl清單
// ValidateCreditCardServer.idl : IDL source for ValidateCreditCardServer.dll
//
// This file will be processed by the MIDL tool to
// produce the type library (ValidateCreditCardServer.tlb) and marshalling code.
import “oaidl.idl”;
import “ocidl.idl”;
[object,uuid(B1D1C73C-E340-4FDC-8734-92ECEC64DC4E),dual,helpstring("IValidateCard Interface"),pointer_default(unique)]interface IValidateCard : IDispatch{[id(1), helpstring("method ValidateCreditCard")] HRESULT ValidateCreditCard([in] BSTR bstrCCNo,[in]BSTR bstrCCType,[out,retval]long *val );[id(2), helpstring("method LuhnCheck")] HRESULT LuhnCheck([in] BSTR bstrCCNo,[in]BSTR bstrCCType);[id(3), helpstring("method LengthCheck")] HRESULT LengthCheck([in] BSTR bstrCCNo,[in]BSTR bstrCCType);[id(4), helpstring("method PrefixCheck")] HRESULT PrefixCheck([in] BSTR bstrCCNo,[in]BSTR bstrCCType);};…
另外它也在組件類的實現(xiàn)類的頭文件ValidateCard.h和實現(xiàn)文件ValidateCard.cpp中分別加入函數(shù)的入口。
ValidateCard.h清單
// ValidateCard.h : Declaration of the CValidateCard
#ifndef _VALIDATECARD_H
#define _VALIDATECARD_H
#include “resource.h” // main symbols
/
// CValidateCard
class ATL_NO_VTABLE CValidateCard :
public CComObjectRootEx<CComSingleThreadModel>,public CComCoClass<CValidateCard, &CLSID_ValidateCard>,public IDispatchImpl<IValidateCard, &IID_IValidateCard, &LIBID_VALIDATECREDITCARDSERVERLib>{
public:
CValidateCard(){}DECLARE_REGISTRY_RESOURCEID(IDR_VALIDATECARD)
DECLARE_PROTECT_FINAL_CONSTRUCT()
BEGIN_COM_MAP(CValidateCard)
COM_INTERFACE_ENTRY(IValidateCard)COM_INTERFACE_ENTRY(IDispatch)END_COM_MAP()
// IValidateCard
public:
STDMETHOD(PrefixCheck)(/*[in]*/ BSTR bstrCCNo,/*[in]*/BSTR bstrCCType);STDMETHOD(LengthCheck)(/*[in]*/ BSTR bstrCCNo,/*[in]*/BSTR bstrCCType);STDMETHOD(LuhnCheck)(/*[in]*/ BSTR bstrCCNo,/*[in]*/BSTR bstrCCType);STDMETHOD(ValidateCreditCard)(/*[in]*/ BSTR bstrCCNo,/*[in]*/BSTR bstrCCType,/*[out,retval]*/long *val);};
#endif //_VALIDATECARD_H
ValidateCard.cpp清單
// ValidateCard.cpp : Implementation of CValidateCard
#include “stdafx.h”
#include “ValidateCreditCardServer.h”
#include “ValidateCard.h”
/
// CValidateCard
STDMETHODIMP CValidateCard::ValidateCreditCard(BSTR bstrCCNo, BSTR bstrCCType, long *val)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())// TODO: Add your implementation code hereCString strType(bstrCCType);strType.MakeUpper();if(strType.Compare("VISA")==0)bstrCCType=SysAllocString(OLESTR("V"));else if(strType.Compare("MASTER")==0)bstrCCType=SysAllocString(OLESTR("M"));else if(strType.Compare("AMERICAN")==0)bstrCCType=SysAllocString(OLESTR("A"));else{*val=0;return S_FALSE;}if((PrefixCheck(bstrCCNo,bstrCCType)==S_OK) && (LengthCheck(bstrCCNo,bstrCCType)==S_OK) && (LuhnCheck(bstrCCNo,bstrCCType)==S_OK)){*val=1;return S_OK;}else{*val=0;return S_FALSE;}return S_FALSE;}
STDMETHODIMP CValidateCard::LuhnCheck(BSTR bstrCCNo, BSTR bstrCCType)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())// TODO: Add your implementation code hereCString strobj(bstrCCNo);CString strReverse,strFinal;int iNum,iSum;char cTemp;strReverse=strobj;strReverse.MakeReverse();for(int iTemp=0;iTemp<strReverse.GetLength();iTemp++){cTemp=strReverse.GetAt(iTemp);iNum=atoi(&cTemp);if(iTemp % 2 !=0){iNum=iNum*2;if(iNum>9)iNum-=9;}cTemp=iNum+'0';strFinal+=cTemp;}for(iTemp=0;iTemp<strFinal.GetLength();iTemp++){cTemp=strFinal.GetAt(iTemp);iSum+=atoi(&cTemp);}if(iSum % 10 == 0)return S_OK;elsereturn S_FALSE;}
STDMETHODIMP CValidateCard::LengthCheck(BSTR bstrCCNo, BSTR bstrCCType)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())// TODO: Add your implementation code hereCString strType(bstrCCType),strLength(bstrCCNo);int ilen=strLength.GetLength();if(strType=="V"){if(ilen==16)return S_OK;}else if(strType=="M"){if(ilen==16)return S_OK;}else if(strType=="A"){if(ilen==15)return S_OK;}return S_FALSE;}
STDMETHODIMP CValidateCard::PrefixCheck(BSTR bstrCCNo, BSTR bstrCCType)
{
AFX_MANAGE_STATE(AfxGetStaticModuleState())// TODO: Add your implementation code hereCString strNumber(bstrCCNo),strType(bstrCCType);if(strType=="V"){if(strNumber.Find("4",0)>=0)return S_OK;}else if(strType=="M"){if(strNumber.Find("51",0)>=0 || strNumber.Find("52",0)>=0 || strNumber.Find("53",0)>=0 || strNumber.Find("54",0)>=0)return S_OK;}else if(strType=="A"){if(strNumber.Find("34",0)>=0 || strNumber.Find("37",0)>=0)return S_OK;}return S_FALSE;}
編繹會讀取ValidateCard.rgs文件進行組件的自動注冊，若在Windows 9X環(huán)境下，請運行regsvr32程序進行注冊，具體參見
Developing COM Components using VC-ATL(2-3) COM對象的注冊角色
同時編繹完成后，會
在Debug目錄下生成ValidateCreditCardServer.dll
在Debug上一層目錄下，即工程名工作空間目錄下生成ValidateCreditCardServer.tlb
這兩個文件都可以導入到客戶端，測試時分別會介紹這兩種方法。
n Visual Basic調(diào)用Visual C++組件
n 編寫步驟：
Private Sub Command1_Click()
Dim comobj As New VALIDATECREDITCARDSERVERLib.ValidateCard
If comobj.ValidateCreditCard(Text1.Text, Text2.Text) = 1 Then
MsgBox "valid card"Else
MsgBox "invalid card"End If
End Sub
n 代碼測試：同上(略)。
n Visual C++調(diào)用Visual C++組件
在這里我不再詳細介紹步驟了，相信通過前面兩個例子介紹，你應(yīng)該掌握了其具體的操作要點。在這里我只扼要地提一下綱領(lǐng)。
2-1在 StdAfx.h 文件中加入代碼
#import “…\ValidateCreditCardServer\ValidateCreditCardServer.tlb”
或
#import “…\ValidateCreditCardServer\Debug\ValidateCreditCardServer.dll”
這兩種方法都可以!
2-2編譯 StdAfx.cpp，產(chǎn)生包裝類，即在客戶工程空間中輸出目錄(C:\VCTestVCComProj\Debug)中創(chuàng)建的兩個文件：類型庫頭文件(ValidateCreditCardServer.tlh)和類型庫實現(xiàn)文件(ValidateCreditCardServer.tli)。
2-3對話框訪問服務(wù)器組件的功能需要使用服務(wù)器包裝類名字空間。為此，在VCTestVCComProjDlg.cpp文件頭部中增加如下的語句：
using namespace VALIDATECREDITCARDSERVERLib;
VCTestVCComProjDlg.cpp清單
// VCTestVCComProjDlg.cpp : implementation file
//
#include “stdafx.h”
#include “VCTestVCComProj.h”
#include “VCTestVCComProjDlg.h”
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = FILE;
#endif
using namespace VALIDATECREDITCARDSERVERLib;
…
BEGIN_MESSAGE_MAP(CVCTestVCComProjDlg, CDialog)
//{{AFX_MSG_MAP(CVCTestVCComProjDlg)ON_WM_SYSCOMMAND()ON_WM_PAINT()ON_WM_QUERYDRAGICON()ON_BN_CLICKED(IDC_BUTTON1, OnButton1)//}}AFX_MSG_MAPEND_MESSAGE_MAP()
…
void CVCTestVCComProjDlg::OnButton1()
{
// TODO: Add your control notification handler code hereHRESULT hr=CoInitialize(NULL);// 初始化COM庫CLSID clsid;hr=CLSIDFromProgID(OLESTR("ValidateCreditCardServer.ValidateCard"),&clsid);// 獲得服務(wù)器的CLSIDIValidateCard * cardptr;hr=CoCreateInstance(clsid,NULL,CLSCTX_INPROC_SERVER,__uuidof(IValidateCard),(LPVOID *)&cardptr);if(FAILED(hr)){AfxMessageBox("Server Creation Failed");return;}//創(chuàng)建COM服務(wù)器組件的實例char cCardNum[20],cCardType[10];GetDlgItemText(IDC_EDIT1,cCardNum,20);GetDlgItemText(IDC_EDIT2,cCardType,10);_bstr_t bstCardNum(cCardNum),bstCardType(cCardType);long lStatus;lStatus=cardptr->ValidateCreditCard(bstCardNum,bstCardType);if(lStatus==1)AfxMessageBox("valid card");elseAfxMessageBox("invalid card"); //使用COM對象CoUninitialize();//終止COM庫}
n 代碼測試：同上(略)。
最后讓我們分析一下C:\VCTestVCComProj\Debug\ValidateCreditCardServer.tlh作為Developing COM Components using VC-ATL(3)的結(jié)尾吧。
ValidateCreditCardServer.tlh清單
// Created by Microsoft ? C/C++ Compiler Version 12.00.8168.0 (ad98f509).
//
// c:\vctestvccomproj\debug\ValidateCreditCardServer.tlh
//
// C++ source equivalent of Win32 type library …\ValidateCreditCardServer\Debug\ValidateCreditCardServer.dll
// compiler-generated file created 12/19/03 at 03:29:03 - DO NOT EDIT!
#pragma once
#pragma pack(push, 8)
#include <comdef.h>
namespace VALIDATECREDITCARDSERVERLib {……………………………………………名字空間
//
// Forward references and typedefs
//
struct /* coclass */ ValidateCard;……………………………………………………………………… 組件類
struct __declspec(uuid(“b1d1c73c-e340-4fdc-8734-92ecec64dc4e”))
/* dual interface */ IValidateCard;………………………………………………….………………用戶接口
//
// Smart pointer typedef declarations
//
_COM_SMARTPTR_TYPEDEF(IValidateCard, __uuidof(IValidateCard));…………………智能指針
//
// Type library items
//
struct __declspec(uuid(“c79635d2-7b86-4b20-a83c-0565dca54c3c”))…………………組件類CLSID
ValidateCard;
// [ default ] interface IValidateCardstruct __declspec(uuid(“b1d1c73c-e340-4fdc-8734-92ecec64dc4e”))……………………用戶接口IID
IValidateCard : IDispatch
{
//// Wrapper methods for error-handling//long ValidateCreditCard (_bstr_t bstrCCNo,_bstr_t bstrCCType );HRESULT LuhnCheck (_bstr_t bstrCCNo,_bstr_t bstrCCType );HRESULT LengthCheck (_bstr_t bstrCCNo,_bstr_t bstrCCType );HRESULT PrefixCheck (_bstr_t bstrCCNo,_bstr_t bstrCCType );……………………………………………….………….. 接口方法(對外)//// Raw methods provided by interface//virtual HRESULT __stdcall raw_ValidateCreditCard (BSTR bstrCCNo,BSTR bstrCCType,long * val ) = 0;virtual HRESULT __stdcall raw_LuhnCheck (BSTR bstrCCNo,BSTR bstrCCType ) = 0;virtual HRESULT __stdcall raw_LengthCheck (BSTR bstrCCNo,BSTR bstrCCType ) = 0;virtual HRESULT __stdcall raw_PrefixCheck (BSTR bstrCCNo,BSTR bstrCCType ) = 0;…………………………………………………..……. 接口方法(對內(nèi))};
//
// Wrapper method implementations
//
#include “c:\vctestvccomproj\debug\ValidateCreditCardServer.tli”…………… 類型庫實現(xiàn)文件
} // namespace VALIDATECREDITCARDSERVERLib………………………………………… 名字空間
#pragma pack(pop)
參照COM組件端C:\ValidateCreditCardServer\ValidateCreditCardServer.idl
ValidateCreditCardServer.idl清單
// ValidateCreditCardServer.idl : IDL source for ValidateCreditCardServer.dll
//
// This file will be processed by the MIDL tool to
// produce the type library (ValidateCreditCardServer.tlb) and marshalling code.
import “oaidl.idl”;
import “ocidl.idl”;
[object,uuid(B1D1C73C-E340-4FDC-8734-92ECEC64DC4E),……………………………. IID部分dual,helpstring("IValidateCard Interface"),pointer_default(unique)]interface IValidateCard : IDispatch{[id(1), helpstring("method ValidateCreditCard")] HRESULT ValidateCreditCard([in] BSTR bstrCCNo,[in]BSTR bstrCCType,[out,retval]long *val );[id(2), helpstring("method LuhnCheck")] HRESULT LuhnCheck([in] BSTR bstrCCNo,[in]BSTR bstrCCType);[id(3), helpstring("method LengthCheck")] HRESULT LengthCheck([in] BSTR bstrCCNo,[in]BSTR bstrCCType);[id(4), helpstring("method PrefixCheck")] HRESULT PrefixCheck([in] BSTR bstrCCNo,[in]BSTR bstrCCType);};[
uuid(B3404054-C33E-4931-B737-5783CEEFECDB),………………………………… LIBID部分version(1.0),helpstring("ValidateCreditCardServer 1.0 Type Library")]
library VALIDATECREDITCARDSERVERLib
{
importlib("stdole32.tlb");importlib("stdole2.tlb");[uuid(C79635D2-7B86-4B20-A83C-0565DCA54C3C),…………………….……CLSID部分helpstring("ValidateCard Class")]coclass ValidateCard{[default] interface IValidateCard;};};
小結(jié):
Developing COM Components using VC-ATL(3)主要介紹了Visual C++與Visual Basic編寫的組件的相互間的調(diào)用。在接下來一篇里將介紹雙接口。
總結(jié)
以上是生活随笔為你收集整理的用ATL创建COM组件详细解说的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。
- 上一篇： “创客中国大创智”创新中国大创智上海市中
- 下一篇： 凯撒加密器