一、前言
1、如果你在使用 vc5.0 及以前的版本，請(qǐng)你升級(jí)為 vc6.0 或 vc.net 2003；
2、如果你在使用 vc6.0 (ATL 3.0)請(qǐng)閱讀本回內(nèi)容；
3、如果你在使用 vc.net(ATL 7.0)請(qǐng)閱讀下回內(nèi)容；(當(dāng)然讀讀本文內(nèi)容也不錯(cuò))
4、這第一個(gè)組件，除了所有 COM 組件必須的 IUnknown 接口外，我們?cè)賹?shí)現(xiàn)一個(gè)自己定義的接口 IFun，它有兩個(gè)函數(shù)： Add()完成兩個(gè)數(shù)值的加法，Cat()完成兩個(gè)字符串的連接。
5、下面......好好聽(tīng)講! 開(kāi)始了:-)
二、建立 ATL 工程
步驟2.1：建立一個(gè)工作區(qū)(WorkSpace)。
步驟2.2：在工作區(qū)中，建立一個(gè) ATL 工程(Project)。示例程序叫 Simple1，并選擇DLL方式，見(jiàn)圖一。
圖一、建立 ATL DLL 工程
Dynamic Link Library(DLL) 表示建立一個(gè) DLL 的組件程序。
Executable(EXE) 表示建立一個(gè) EXE 的組件程序。
Service(EXE) 表示建立一個(gè)服務(wù)程序，系統(tǒng)啟動(dòng)后就會(huì)加載并執(zhí)行的程序。
Allow merging of proxy/stub code 選擇該項(xiàng)表示把“代理/存根”代碼合并到組件程序中，否則需要單獨(dú)編譯，單獨(dú)注冊(cè)代理存根程序。代理/存根，這個(gè)是什么概念？還記得我們?cè)谏匣貢?shū)中介紹的嗎？當(dāng)調(diào)用者調(diào)用進(jìn)程外或遠(yuǎn)程組件功能的時(shí)候，其實(shí)是代理/存根負(fù)責(zé)數(shù)據(jù)交換的。關(guān)于代理/存根的具體變成和操作，以后再說(shuō)啦......
Support MFC 除非有特殊的原因，我們寫(xiě) ATL 程序，最好不要選擇該項(xiàng)。你可能會(huì)說(shuō)，如果沒(méi)有MFC的支持，那CString怎么辦呀？告訴你個(gè)秘密吧，一般人我都不告訴他，我后半輩子就靠著這個(gè)秘密活著了：
1、你會(huì)STL嗎？可以用 STL 中的 string 代替；
2、自己寫(xiě)個(gè) MyString 類(lèi)，嘿嘿；
3、悄悄地、秘密地、不要告訴別人（特別是別告訴微軟），把 MFC 中的 CString 源碼拿過(guò)來(lái)用；
4、使用 CComBSTR 類(lèi)，至少也能簡(jiǎn)化我們字符串操作；
5、直接用 API 操作字符串，反正我們大家學(xué)習(xí) C 語(yǔ)言的時(shí)候，都是從這里干起的。（等于沒(méi)說(shuō)，呵呵）
Support MTS 支持事務(wù)處理，也就是是否支持 COM+ 功能。COM+ 也許在第 99 回介紹吧。
三、增加 ATL 對(duì)象類(lèi)
步驟3.1：菜單 Insert\New ATL Object...（或者用鼠標(biāo)右鍵在 ClassView 卡片中彈出菜單）并選擇Object 分類(lèi)，選中 Simple Object 項(xiàng)目。見(jiàn)圖二。
圖二、選擇建立簡(jiǎn)單COM對(duì)象
Category Object 普通組件。其中可以選擇的組件對(duì)象類(lèi)型很多，但本質(zhì)上，就是讓向?qū)臀覀兡J(rèn)加上一些接口。比如我們選 "Simple Object"，則向?qū)Ыo我們的組件加上 IUnknown 接口；我們選 "Internet Explorer Object"，則向?qū)С思由?IUnknown 接口外，再增加一個(gè)給 IE 所使用的 IObjectWithSite 接口。當(dāng)然了，我們完全可以手工增加任何接口。
Category Controls ActiveX 控件。其中可以選擇的 ActiveX 類(lèi)型也很多。我們?cè)诤罄m(xù)的專(zhuān)門(mén)介紹 ActiveX 編程中再討論。
Category Miscellaneous 輔助雜類(lèi)組件。
Categroy Data Access 數(shù)據(jù)庫(kù)類(lèi)組件(我最討厭數(shù)據(jù)庫(kù)編程了，所以我也不會(huì))。
步驟3.2：增加自定義類(lèi) CFun(接口 IFun) ,見(jiàn)圖三。
圖三、輸入類(lèi)中的各項(xiàng)名稱(chēng)
其實(shí)，我們只需要輸入短名(Short Name)，其它的項(xiàng)目會(huì)自動(dòng)填寫(xiě)。沒(méi)什么多說(shuō)的，只請(qǐng)大家注意一下 ProgID 項(xiàng)，默認(rèn)的 ProgID 構(gòu)造方式為“工程名.短名”。
步驟3.3：填寫(xiě)接口屬性，見(jiàn)圖四。
圖四、接口屬性
Threading Model 選擇組件支持的線程模型。COM 中的線程，我認(rèn)為是最討厭，最復(fù)雜的部分。COM 線程和公寓的概念，留待后續(xù)介紹。現(xiàn)在嗎......大家都選 Apartment，它代表什么那？簡(jiǎn)單地說(shuō)：當(dāng)在線程中調(diào)用組件函數(shù)的時(shí)候，這些調(diào)用會(huì)排隊(duì)進(jìn)行。因此，這種模式下，我們可以暫時(shí)不用考慮同步的問(wèn)題。
Interface 接口基本類(lèi)型。Dual 表示支持雙接口，這個(gè)非常 非常重要，非常非常常用，但我們今天不講。Custom 表示自定義借口。切記！切記！我們的這第一個(gè) COM 程序中，一定要選擇它！！！！（如果你選錯(cuò)了，請(qǐng)刪除全部?jī)?nèi)容，重新來(lái)過(guò)。）
Aggregation 我們寫(xiě)的組件，將來(lái)是否允許被別人聚合使用。Only 表示必須被聚合才能使用，有點(diǎn)類(lèi)似 C++ 中的純虛類(lèi)，你要是總工程師，只負(fù)責(zé)設(shè)計(jì)但不親自寫(xiě)代碼的話，才選擇它。
Support ISupportErrorInfo 是否支持豐富信息的錯(cuò)誤處理接口。以后就講。
Support Connection Points 是否支持連接點(diǎn)接口（事件、回調(diào)）。以后就講。
Free Threaded Marshaler 以后也不講，就算打死你，我也不說(shuō)！
四、添加接口函數(shù)
圖五、調(diào)出增加接口方法的菜單
圖六、增加接口函數(shù) Add
圖七、增加接口函數(shù) Cat
請(qǐng)嚴(yán)格按照?qǐng)D六的方式，增加Add()函數(shù)；由于圖七中增加Cat()函數(shù)的參數(shù)比較長(zhǎng)，我沒(méi)有適當(dāng)?shù)妮斎肟崭瘢?qǐng)大家自己輸入的時(shí)候注意一下。[in]表示參數(shù)方向是輸入；[out]表示參數(shù)方向是輸出；[out,retval]表示參數(shù)方向是輸出，同時(shí)可以作為函數(shù)運(yùn)算結(jié)果的返回值。一個(gè)函數(shù)中，可以有多個(gè)[in]、[out]，但[retval]只能有一個(gè)，并且要和[out]組合后在最后一個(gè)位置。
圖八、接口函數(shù)定義完成后的圖示
我們都知道，要想改變 C++ 中的類(lèi)函數(shù)，需要修改兩個(gè)地方：一是頭文件(.h)中類(lèi)的函數(shù)聲明，二是函數(shù)體(.cpp)文件的實(shí)現(xiàn)處。而我們現(xiàn)在用 ATL 寫(xiě)組件程序，則還要修改一個(gè)地方，就是接口定義(IDL)文件。別著急 IDL 下次就要討論啦。
由于 vc6.0 的BUG，導(dǎo)致大家在增加完接口和接口函數(shù)后，可能不會(huì)向上圖（圖八）所表現(xiàn)的樣式。解決方法：
| 1 |
關(guān)閉工程，然后重新打開(kāi) |
該方法常常有效 |
| 2 |
關(guān)閉 IDE，然后重新運(yùn)行 |
|
| 3 |
打開(kāi) IDL 文件，檢查接口函數(shù)是否正確，如不正確請(qǐng)修改 |
|
| 4 |
打開(kāi) IDL 文件，隨便修改一下(加一個(gè)空格，再刪除這個(gè)空格)，然后保存 |
該方法常常有效 |
| 5 |
打開(kāi) h/cpp 文件，檢查函數(shù)是否存在或是否正確，有則改之 |
無(wú)則嘉勉，不說(shuō)完這個(gè)成語(yǔ)心理別扭 |
| 6 |
刪除 IDL/H/CPP 中的接口函數(shù)，然后 |
再來(lái)一遍 |
| 7 |
重新建立工程、重新安裝vc、重新安裝windows、砸計(jì)算機(jī) |
砸！ |
五、實(shí)現(xiàn)接口函數(shù)
鼠標(biāo)雙點(diǎn)圖八中CFun\IFun\Add(...)就可以開(kāi)始輸入函數(shù)實(shí)現(xiàn)了：
STDMETHODIMP CFun::Add(long n1, long n2, long *pVal)
{
*pVal = n1 + n2;
return S_OK;
}
這個(gè)太簡(jiǎn)單了，不再浪費(fèi)“口條”。下面我們實(shí)現(xiàn)字符串連接的Cat()函數(shù)：
STDMETHODIMP CFun::Cat(BSTR s1, BSTR s2, BSTR *pVal)
{
int nLen1 = ::SysStringLen( s1 ); // s1 的字符長(zhǎng)度
int nLen2 = ::SysStringLen( s2 ); // s2 的字符長(zhǎng)度
*pVal = ::SysAllocStringLen( s1, nLen1 + nLen2 ); // 構(gòu)造新的 BSTR 同時(shí)把 s1 先保存進(jìn)去
if( nLen2 )
{
::memcpy( *pVal + nLen1, s2, nLen2 * sizeof(WCHAR) ); // 然后把 s2 再連接進(jìn)去
// wcscat( *pVal, s2 );
}
return S_OK;
}
學(xué)生：上面的函數(shù)實(shí)現(xiàn)，完全是調(diào)用基本的 API 方式完成的。
老師：是的，說(shuō)實(shí)話，的確比較煩瑣。
學(xué)生：我們是用memcpy()完成連接第二個(gè)字符串功能的，那么為什么不用函數(shù) wcscat()那？
老師：多數(shù)情況下可以，但你需要知道：由于BSTR包含有字符串長(zhǎng)度，因此實(shí)際的BSTR字符串內(nèi)容中是可以存儲(chǔ)L’’\0’’的，而函數(shù) wcscat() 是以L’’\0’’作為復(fù)制結(jié)束標(biāo)志，因此可能會(huì)丟失數(shù)據(jù)。明白了嗎？
學(xué)生：明白，明白。我看過(guò)《COM 組件設(shè)計(jì)與應(yīng)用之?dāng)?shù)據(jù)類(lèi)型》后就明白了。那么老師，有沒(méi)有簡(jiǎn)單一些的方法那？
老師：有呀，你看......
STDMETHODIMP CFun::Cat(BSTR s1, BSTR s2, BSTR *pVal)
{
CComBSTR sResult( s1 );
sResult.AppendBSTR( s2 );
*pVal = sResult.Copy();
// *pVal = sResult.Detach();
return S_OK;
}
學(xué)生：哈哈，好！使用了 CComBSTR，這個(gè)就簡(jiǎn)單多了。CComBSTR::Copy()和CComBSTR::Detach()有什么區(qū)別？
老師：CComBSTR::Copy() 會(huì)制造一個(gè) BSTR 的副本，另外CComBSTR::CopyTo()也有類(lèi)似功能。而CComBSTR::Detach()是使對(duì)象與內(nèi)部的 BSTR 指針剝離，這個(gè)函數(shù)由于沒(méi)有復(fù)制過(guò)程，因此速度稍微快一點(diǎn)點(diǎn)。但要注意，一但剝離后，就不能再使用該對(duì)象啦。
學(xué)生：老師，您講的太牛啦，我對(duì)您的敬仰如巍巍泰山，直入云霄......
老師：STOP，STOP！留作業(yè)啦......
1、自己先按照今天講的內(nèi)容寫(xiě)出這個(gè)組件；
2、不管你懂不懂，一定要去觀察 IDL 文件，CPP 文件；
3、編譯后，看都產(chǎn)生了些什么文件？如果是文本的文件，就打開(kāi)看看；
4、下載本文的示例程序(vc6.0版本)編譯運(yùn)行，看看效果。然后預(yù)習(xí)一下示例程序中的調(diào)用方法；
學(xué)生：知道啦，快下課吧，我要上廁所，我都憋的不行了......
老師：下課！別忘了頂我的帖子呀......