本文首先描述创建一个COM服务器的步骤和核心代码.然后说明客户程序关键代码。
此COM服务器实现一个TimeLogServer组件,为简明起见,此组件只有一个接口ITimeLog,通过ITimeLog的方法OutputLog可以将日志文本输出至日志文件。
创建一个MFC DLL工程,选择支持Automation(当然本程序不一定是自动化服务器,在这里这样做好处在于自动实现了几个必要的输出函数如DllGetClassObject,DllRegisterServer等,否则要自己写)
第一节 COM服务器
一. 声明组件和接口
1.写一个GUIDs.h,在GUIDs.h中声明组件和接口的GUID
//声明组件GUID {A433E701-E45E-11d3-97B5-52544CBA7F28} //DEFINE_GUID(CLSID_TimeLogServer, //0xa433e701, 0xe45e, 0x11d3, 0x97, 0xb5, 0x52, 0x54, 0x4c, 0xba, 0x7f, 0x28); static const IID CLSID_TimeLogServer = {0xa433e701, 0xe45e, 0x11d3, {0x97, 0xb5, 0x52, 0x54, 0x4c, 0xba, 0x7f, 0x28}}; // 声明接口GUID{A433E702-E45E-11d3-97B5-52544CBA7F28} //DEFINE_GUID(IID_ITimeLog, //0xa433e702, 0xe45e, 0x11d3, 0x97, 0xb5, 0x52, 0x54, 0x4c, 0xba, 0x7f, 0x28); static const IID IID_ITimeLog = {0xa433e702, 0xe45e, 0x11d3, {0x97, 0xb5, 0x52, 0x54, 0x4c, 0xba, 0x7f, 0x28}}; |
2.写一个ITimeLogServer.h,在ITimeLogServer.h文件中声明组件和接口
//ITimeLogServer.h #include ";GUIDs.h"; //接口ITimeLog的声明 DECLARE_INTERFACE_(ITimeLog,IUnknown) { STDMETHOD(OutputLog)(BSTR* varLogText)PURE; }; |
说明:
1.宏DEFINE_GUID将组件和接口的progid与GUID相关联.可以用guidgen.exe工具产生。
2.宏DECLARE_INTERFACE_声明接口;该宏第一个参数为接口名,第二个参数为该接口的基类.声明没有基类的接口用DECLARE_INTERFACE宏。
3.宏STDMETHOD声明接口中的方法.此方法的返回值为HRESULT.PURE被解释为";=0";,即此方法为纯虚函数.当方法的返回值不是HRESULT时,用宏STDMETHOD_(返回类型,函数名)(参数)PURE;
二.声明组件类CTimeLogServer和实现接口的嵌套类
在ClassWizard中添加新类CTimeLogServer,其基类选择为CCmdTarget.修改其头文件TimeLogServer1.h,加上#include ";ITimeLogServer.h";;同时在类声明体中加上
//声明实现ITimelog接口的嵌套类 BEGIN_INTERFACE_PART(TimeLog,ITimeLog)//自动声明IUnknown接口的三个方法 STDMETHOD(OutputLog)(BSTR* varLogText); END_INTERFACE_PART(TimeLog) //声明接口映射 DECLARE_INTERFACE_MAP() //声明类厂 DECLARE_OLECREATE(CTimeLogServer) |
三.实现类厂和接口映射
在CTimeLogServer的实现文件中写入:
//实现类厂 IMPLEMENT_OLECREATE(CTimeLogServer,";TimeLogServer";, 0xa433e701, 0xe45e, 0x11d3, 0x97, 0xb5, 0x52, 0x54, 0x4c, 0xba, 0x7f, 0x28); //映射接口到相应的嵌套类 BEGIN_INTERFACE_MAP(CTimeLogServer,CCmdTarget) INTERFACE_PART(CTimeLogServer,IID_ITimeLog,TimeLog) END_INTERFACE_MAP() |
四.在组件的构造和析构函数中对全局对象计数
CTimeLogServer::CTimeLogServer() CTimeLogServer::~CTimeLogServer() |
五.为嵌套类实现IUnknown接口
//为嵌套类而实现IUnknown接口 STDMETHODIMP_(ULONG) STDMETHODIMP |
说明:虽然CCmdTarget类已经实现了IUnknown接口,但是还必须通过上述代码来将嵌套类的IUnknown映射到CCmdTarget支持的IUnknown接口.METHOD_PROLOGUEH宏的两个参数分别是实现组件对象的类和实现接口的嵌套类。
六.实现ItimeLog接口的方法OutputLog
注意本组件的功能是往日志文件中输入日志.
1. 在组件类中添加一个文件指针:
// Attributes public: protected: FILE* m_logfile; |
2. 初始化和退出
首先在CTimeLogServer的构造函数中进行一些初始化:
CTimeLogServer::CTimeLogServer() { ::AfxOleLockApp(); CTime TimeStamp = CTime::GetCurrentTime(); CString FileName; FileName.Format(_T(";%s.log";),TimeStamp.Format(";%Y%m%d";)); m_logfile = fopen(FileName,_T(";a";)); if(m_logfile) { fprintf(m_logfile,_T(";# # # # # # # # # # # # # # # # # /n";)); fprintf(m_logfile,_T(";开始于:%s";),(LPCTSTR)TimeStamp.Format(";%Y年%m月%d日%H:%M %S";)); fprintf(m_logfile,_T(";/n";)); } } //然后在析构函数中关闭文件 CTimeLogServer::~CTimeLogServer() { ::AfxOleUnlockApp(); if(m_logfile) { CTime TimeStamp = CTime::GetCurrentTime(); fprintf(m_logfile,_T(";/n";)); fprintf(m_logfile,_T(";结束于:%s";),(LPCTSTR)TimeStamp.Format(";%Y年%m月%d日%H:%M %S";)); fprintf(m_logfile,_T(";/n";)); fprintf(m_logfile,_T(";# # # # # # # # # # # # # # # # #/n";)); fclose(m_logfile); } } |
3. 实现接口ITimeLog方法
//实现接口ITimeLog方法 STDMETHODIMP CTimeLogServer::XTimeLog::OutputLog(BSTR* varLogText) { METHOD_PROLOGUE(CTimeLogServer,TimeLog) if(pThis->;m_logfile) { CTime TimeStamp = CTime::GetCurrentTime(); CString NowTime = TimeStamp.Format(";%Y年%m月%d日%H:%M:%S";); CString LogText((LPCWSTR)*varLogText); fprintf(pThis->;m_logfile,";/n%s/n%s/n%";,NowTime,LogText); return NOERROR; } else { AfxMessageBox(";没有日志文件!";); return S_FALSE; } } |
七.完善组件服务器
在应用对象CTimeLogServerApp的 实现文件中,处理Instance()和ExitInstance()
BOOL CTimeLogServerApp::InitInstance() return TRUE; |
第二节 客户程序
使用COM组件服务器的客户程序关键步骤是:初始化COM库,创建组件对象并获取IUnknown接口指针,查询接口并使用,释放组件。
#include ";ITimeLogServer.h"; //初始化COM库,对组件实例化 HRESULT hResult; IUnknown* pIUnknown; hResult = ::CoInitialize(NULL); if(FAILED(hResult)) { ::AfxMessageBox(";不能初始化COM库!";); return FALSE; } //创建组件实例 pIUnknown = NULL; hResult = ::CoCreateInstance(CLSID_TimeLogServer,NULL, CLSCTX_INPROC_SERVER,IID_IUnknown,(void**)&;pIUnknown); if(FAILED(hResult)) { pIUnknown = NULL; ::AfxMessageBox(";不能创建TimeLog对象!";); return FALSE; } //查询接口并使用 if(pIUnknown!=NULL) { ITimeLog* pITimeLog; HResult=pIUnknown->;QueryInterface(IID_ITimeLog,(void**)&;pITimeLog); if(FAILED(hResult)) { ::AfxMessageBox(";不能获取接口ITimeLog!";); pIUnknown->;Release(); return; } BSTR bstrLogText; bstrLogText = m_logtext.AllocSysString(); CString text((LPCWSTR)bstrLogText); ::AfxMessageBox(text); if(FAILED(pITimeLog->;OutputLog(&;bstrLogText))) { ::AfxMessageBox(";日志输出出错!";); pITimeLog->;Release(); return; } pITimeLog->;Release(); ::AfxMessageBox(";日志已经写入!";); } //释放组件 pIUnknown->;Release(); pIUnknown = NULL; ::CoUninitialize(); |
来源:CSDN
作者:snz
链接:https://blog.csdn.net/snz/article/details/1468750