个人开发历程知识库

关注C++/Java/C#技术, 致力于安防监控/移动应用/WEB方面开发
------------------------------------ 业精于勤,荒于嬉;行成于思,毁于随
  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理
转载:VC知识库 http://www.vckbase.com/document/viewdoc/?id=1630

连接 COM 与 .NET 的桥梁(三)
COM 服务器的 COM Interop 方式


作者:caeser2

源代码下载

本节部分内容要求读者熟悉COM的消息调用原理,原理请参见杨老师的 专栏文章。

前文内容:

COM 服务器 --> COM 客户端

...
COM 服务器 --> .net客户端
 1、P/Invoke
 2、COM Interop(本节内容)

  上回介绍了COM服务器端未知或没有接口时的调用方法P/Invoke,这回我们来探讨一下已知接口的情况,COM Interop 方式。

一、普通的接口函数调用

  这部分的示例代码叫做ComP6srcDNet中的ComP5工程,呵呵,有点眼熟吧,其实我的目的只是想介绍.net部分,所以COM和MFC部分引自杨老师的“COM 组件设计与应用(七)——编译、注册、调用” ,只有Use_Net的代码是我写的,我在这里多谢杨老师啦,没有您前面栽的树,咱也没法乘凉哈^_^
  虽然.net本身就是COM凤凰涅磐后的产物,从很多.net结构的工作原理中都能看到 COM 的影子,但是从.net的COM调用中可以很明显的看出,.net在淡化(隐藏)接口的作用,这一点从下面的代码中可以看到。

对于COM服务器的调用,需要先做以下三个操作:
  1>用regsvr32.exe注册COM。
  2>用Tlbimp.exe导出类型库。被导出文件可以是dll文件,也可以是tlb文件;导出后生成的文件默认命名为原COM名称后加Lib。
  3>"添加引用",详见下
  然后就可以写调用代码了。

/*Simple2是杨老师写的COM服务器,带有Add(int,int)和Cat(BSTR,BSTR)两个函数
Use1、2、3、4、5是杨老师写的8种COM调用方法....不是我不会数数哦,不信你自己去看代码
Use_Net是我写的.net调用

在"解决方案"面版中选择"引用"项,鼠标右键"添加引用",将Tlbimp.exe生成的类型库文件添加进程序集。结果如图



也可以用[DllImport(...)]方法引用COM
*/
//写个引用,方便使用
  using namespace Simple2Lib;

  FunClass *m_pCom;       //FunClass有点像MFC中包装过的智能指针xxxPtr

//初始化
  try
  {
    m_pCom=new FunClass;   //.net框架自动连接到COM服务器,不用我们动手^_^
  }
  catch(...)
  {
    MessageBox::Show("COM没有注册吧?");
    Close();
  }

//计算 or 连接。呵呵,这么写还真够简单的,两句话搞定,.net的异常机制会帮我们判断用户是想做加法,还是想做字符串连接
  try
  {
    textBox3->Text=m_pCom->Add(
    Convert::ToInt32(textBox1->Text),Convert::ToInt32(textBox2->Text)).ToString();
  }
  catch(...)
  {
    textBox3->Text=m_pCom->Cat(textBox1->Text,textBox2->Text);
  }
  这就完啦,是不是很容易呢?熟悉COM调用的读者可以发现,其中许多COM初始化及查找接口的工作都被.net隐藏了,一些常用的参数Marshal转换封送操作也自动处理了,这使得我们用.net客户端调用COM服务器比COM客户端调用COM服务器还要容易。

二、回调接口的调用


  如果不支持COM消息机制,就不能算支持COM服务。我们先看看回调接口的调用方法。
  示例代码叫做CallBackInterface中的CallBackInterface工程,还是引自杨老师的文章:“COM组件设计与应用(十四)——事件和通知” 。其中:
Simple12项目改名为CallBack,实现有1个回调接口的CallBack.DLL(Simple12.DLL);
Use1项目改名为Use_MFC,实现用MFC调用CallBack.DLL;
Use_Net是我用.net框架写的。

不要忘了调用COM服务器需要做的3个操作啊!
//首先实现接口,写法完全模仿Use_MFC
#pragma once
  using namespace CallBackLib;
namespace Use_Net
{
  public __gc class CSink : public ICallBack          //继承自回调接口
  {
  public:
    CSink(TextBox *p,Label *q): textBox3(p) {}
  private:
    TextBox *textBox3;   //用来显示结果
    void CallBackLib::ICallBack::Fire_Result(int nResult)   //实现回调接口的虚函数
    {
      textBox3->Text=nResult.ToString();
    }
  };
}
//怎么只实现了一个虚函数?其他的呢?呵呵,又是.net,它已经帮我们做好啦

  CSink *sink;      //实例化回调接口
  Event1Class *m_spCom; //Event1Class有点像MFC中接口的智能指针xxxPtr
  int m_dwCookie;    //保存标志。什么,你不知道这个是干什么的?去问杨老师!^_^

//初始化
  m_dwCookie = 0;
  sink=new CSink(textBox3,label1);
  try {
    m_spCom=new Event1Class;    //.net自动连接到COM服务器
  }
  catch(...)
  {
    MessageBox::Show("杨老师说:注册了吗?COM初始化了吗?");
    Close();
  }

//连接
  m_spCom->Advise(sink,&m_dwCookie);

//使用
  try
  {
    m_spCom->Add(Convert::ToInt32(textBox1->Text),Convert::ToInt32(textBox2->Text));
  }
  catch(...)
  {
    MessageBox::Show("输入的格式不正确");
  }

//断开
  m_spCom->Unadvise(m_dwCookie);
  m_dwCookie=0;

三、连接点的调用


  这部分的示例代码是DispConnect中的DispConnect工程,还~~~是引自杨老师的文章:COM 组件设计与应用(十六)——连接点。其中:
Simple16项目名称变为SingleConnect,实现有1个连接点的SingleConnect.DLL;
MultConnect项目名称不变,实现有2个连接点的MultConnect.DLL;
Use项目变为Use_MFC,实现用MFC调用SingleConnect.DLL;
UseMult项目变为UseMult_MFC,实现用MFC调用MultConnect.DLL,并修复了老师在头文件上的一点错误:)
Use_Net是我用.net框架写的,实现用.net调用SingleConnect.DLL;
UseMult_Net是我用.net框架写的,实现用.net调用MultConnect.DLL。

不要忘了调用1个COM服务器需要做的3个操作啊!,这回要调用的是2个COM!
//Use_Net
  DispConnectClass *sink;    //声明包装类对象,有点像com客户端包装过的智能指针xxxPtr

//初始化
  try
  {
    sink=new DispConnectClass;//.net帮我们自动连接到接口
  }
  catch(...)
  {
    MessageBox::Show("杨老师说:没有注册还是没有初始化?");
    Close();
  }

//连接
//用事件/委托模型替换了连接点模型。.net框架已经自动包装好委托了
  sink->Result+=new _IDispConnectEvents_ResultEventHandler(this,My_ResultEvent);

//回调函数
private: System::Void My_ResultEvent(int e)  //ATL的LONG类型被Marshal为int
  {
    textBox3->Text=e.ToString();      //textBox3用来显示结果
  }

//使用
  try
  {
    sink->Add(Convert::ToInt32(textBox1->Text),Convert::ToInt32(textBox2->Text));
  }
  catch(...)
  {
    MessageBox::Show("输入的数字格式不正确!");
  }

//断开
//这步操作不需要了,.net在程序Close()时自动处理了
以此类推,多个连接点的UseMult_Net就很好理解了
  DispConnectClass *sink;  //声明包装类对象,有点像com客户端包装过的智能指针xxxPtr
//初始化
  try
  {
    sink= new DispConnectClass;  //.net自动帮我们连接到接口,Close()时自动断开
  }
  catch(...)
  {
    MessageBox::Show("杨老师说:没有注册还是没有初始化?");
    Close();
  }
//连接
  //用事件、委托模型替换了连接点模型。.net框架已经自动包装好委托了
  //奇怪,在"对象阅览器"中看不到"Timer"事件....Bug啊Bug,你怎么这么多捏?才写了几篇.net的文章,就发现这么多
  sink->Timer+= new _IDispConnectEvents2_TimerEventHandler(this,My_TimeEvent);
  sink->Result+=new _IDispConnectEvents_ResultEventHandler(this,My_ResultEvent);
//回调函数
private: System::Void My_TimeEvent(Object *e)  //VARIANT被Marshal为Object*
  {
    label1->Text=e->ToString();       //label1用来显示时间
  }
private: System::Void My_ResultEvent(int e)   //ATL的LONG类型被Marshal为int
  {
    textBox3->Text=e.ToString();      //textBox3用来显示结果
  }
//使用
  //开始计时
  sink->SetTimer(1000);
....
  //停止计时
  sink->KillTimer();
....
  //Add(int,int)
  try
  {
    sink->Add(Convert::ToInt32(textBox1->Text),Convert::ToInt32(textBox2->Text));
  }
  catch(...)
  {
    MessageBox::Show("输入的数字格式不正确!");
  }
//断开
//这步操作不需要了,.net在程序Close()时自动处理了
四、ActiveX的调用

  这个原理比较麻烦,但使用却很简单,MSDN以MediaPlayer控件(msdxm.ocx)举的例,大家感兴趣可以试试,我把它打包进 tools中了。这里我换一个ActiveX,下载文件tools中的AxDemo.dll,是杨老师的文章......嗯~~还没发表出来啊,那我就代 老师先把代码发表出来吧^_^,AxDemo.dll的代码大家自己去看示例文件ActiveXDemo中的ActiveXDemo工程,那可是我独家纰 漏的、杨老师亲手写的、至今还未公开的绝密资料哟~~
AxDemo是杨老师用vc6写的ActiveX,注意不能用其它版本的vc重新编译;控件叫做ui Class;
Use_MFC和Use_Net是我写的调用。
  MFC的调用步骤我不多说了,杨老师以后会告诉大家的,我只说说.net的调用步骤:
1.regsvr32.exe注册:

    

2.添加控件到工具箱中(.net窗体编辑器的右键菜单里的没有"插入ActiveX控件"项):

    ->

如果没有注册,则在列表中是找不到的。这时可以这样(编译器将自动注册):

    

3.将控件“画”在窗体中。编译器会自动调用Aximp.exe导出类型库:

    

4.编译、调试:

    


ActiveX相对于其它COM组件而言最舒服的地方是属性和事件可以直接在“属性”面版中调整,真正的可视化编程呐。

五、其它

  遗憾的是,我使用的VS 2003(.net v1.1)不支持代码级别的C++ Interop方法,所以COM服务器方面我只能写到这里了,下一节我们开始讨论.net做服务器时的各种操作。
  供下载的文件包中的tools文件夹提供了几个工具
名称 regsvr32.exe TlbImp.exe AxImp.exe ildasm.exe
功能 注册COM控件 导出COM控件的类型库 ActiveX 控件的 COM 类型库中的类型定义转换为 Windows 窗体控件 用来反汇编.net程序,.exe和.dll文件均可
基本操作 注册:regsvr32 dll文件名 导出:TlbImp dll文件名

导出:aximp dll或ocx文件名

程序是窗口化的
反注册:regsvr32 /u dll文件名