公共语言运行库(CLR)开发系列课程(3)：COM Interop基础学习笔记

2022-10-26 20:39:59

上章地址
什么是COM
- Component Object Model 组建对象模型
- 基于接口（Interface）
  - 接口=协议
  - IID 标识接口
  - V-table 虚表方式调用
  - 单继承
- 对象（Object）
  - 实现一个或者多个接口
举例：IDispatch接口

为什么要使用COM Interop
- 重用代码：使用.NET调用已有的COM组件，提高生产率：使用.NET编写COM组件　
COM Interop基础概念
- RCW：Runtime Callable Wrapper .NET可调用COM组件的包装代理 .NET=>RCW=>COM　
- CCW：Com Callable Wrapper 　COM可调用的包装代理　　 COM=>CCW=>.NET
RCW基础
- 定义COM接口
```
[ComImport]

[Guid("....")]

[InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]

interface IMyInterface

{

       void Func();

}
```
- Attributes
  - ComImport 接口按照对应的COM接口定义
  - Guid 指定IID
  - InterfaceType
    - ComInterfaceType.InterfaceIsIUnknown　在.NET调用COM组件的时候总是用虚表的方式调用和C++调用虚函数一样要知道函数指针以及偏移量
      - Early Bound　　早绑定
      - 基于虚表
      - 函数顺序必须和COM接口完全一致但是如果你不用后面方法只调用前三个那么只需要前三个方法对应就行了不建议可能导致顺序婚论
    - ComInterfaceType.InterfaceIsIDispatch　通过函数名字和 Displd调用 COM组件用VB写的建议使用这种方式调用这种方式中间会有Invoke 会慢点方便点
      - Late Bound 后期绑定
      - 支持IDispatch
      - 通过Displd 属性指定Dispatch ID 或者自动生成
      - 函数顺序不重要　　
    - ComInterfaceType.InterfaceIsDual 既支持虚表调用也支持IDispatch方式调用上面两种他都支持
      - 支持 IUnknown和IDispatch两种方式他需要顺序和ID都要对

接口的继承　　　　　　

需要重新定义父接口的成员函数　父接口函数放前面自身接口放后面按顺序声明

[ComImport]

interface IA

{

  void FuncA();

}

[ComImport]

interface IB:IA

{

    void new FuncA();

    void FuncB();

}

定义RCW

[ComImport]

public class MyRcw:IMyInterface

{

      [MethodImplAttribute(MethodImplOptions.InternalCall)]

      public extern void MyFunc();

}

ComImport 告诉CLR这个是RCW
extern + InternalCall 函数由CLR内部实现具有ComImport特性的时候必须使用extern和InternalCall 强制约束

自动生成RCW：TlbImp
- TlbImp<tlb_name>
- 生成Interop Assembly
  - Struct/Union
  - Enum
  - Interface
  - Class
- 直接引用即可
- VS中Add Reference
使用RCW
- 创建RCW MyRCW rcw=new MyRCW();
- 释放RCW GC自动处理 AppDomain Unload 时候 Marshal.ReleaseComObject Marshal.FinalReleaseComObject
- 调用方法 rew.Func()
- Cast
  - ImyInterface2 interface2=rcw as IMyInterface2; 可能成功
  - 实际上对应QueryInterface调用　　
  - 不需要RCW类型本身实现IMyInterface2！
  - 失败则抛出异常（Cast）或者返回Null （as 操作符）
DEMO

　　不会建立com 组件的请参考csdn上一位大牛的帖子上面有详细的创建流程在此感谢大牛的分享 ,这里在分享一篇有心人收集的对应表 com 我个人感觉用的是Windows数据类型自己参考查看对应表

c#代码片段

    class Program

    {

        [ComImport, Guid("31E95758-B52C-4252-B4E0-F33547F9B55A")]

        public interface IMyATLClass

        {

            [MethodImpl(MethodImplOptions.InternalCall, MethodCodeType = MethodCodeType.Runtime), DispId()]

            void Add([In] int para1, [In] int para2);

            [MethodImpl(MethodImplOptions.InternalCall, MethodCodeType = MethodCodeType.Runtime), DispId()]

            void PopupDialog(string text);

            [MethodImpl(MethodImplOptions.InternalCall, MethodCodeType = MethodCodeType.Runtime), DispId()]

            void Sum([In] int para1, [In] int para2, out int Sum);

            [MethodImpl(MethodImplOptions.InternalCall, MethodCodeType = MethodCodeType.Runtime), DispId()]

            void Messg([In] string test);

        }

        [ComImport, CoClass(typeof(MyATLClassClass)), Guid("31E95758-B52C-4252-B4E0-F33547F9B55A")]

        public interface MyATLClass : IMyATLClass

        {

        }

        [ComImport, Guid("D14CE5C7-9648-427B-BEAC-504E1A91DDAE")]

        public class MyATLClassClass : IMyATLClass, MyATLClass

        {

            [MethodImpl(MethodImplOptions.InternalCall, MethodCodeType = MethodCodeType.Runtime), DispId()]

            public virtual extern void Add([In] int para1, [In] int para2);

            [MethodImpl(MethodImplOptions.InternalCall, MethodCodeType = MethodCodeType.Runtime), DispId()]

            public virtual extern void PopupDialog([MarshalAs(UnmanagedType.BStr)] string text);

            [MethodImpl(MethodImplOptions.InternalCall, MethodCodeType = MethodCodeType.Runtime), DispId()]

            public virtual extern void Sum([In] int para1, [In] int para2, out int Sum);

            [MethodImpl(MethodImplOptions.InternalCall, MethodCodeType = MethodCodeType.Runtime), DispId()]

            public virtual extern void Messg([In] string test);

        }

        static void Main(string[] args)

        {

          //  MyATLComLib.IMyATLClass aa = new MyATLComLib.MyATLClass();

            //int i;

            //aa.Sum(1, 1, out i);

            //aa.Add(1, 1);

            //IntPtr sb = Marshal.StringToCoTaskMemAnsi("123");

            IMyATLClass aa = new MyATLClass();

            int i;

            aa.Sum(, , out i);

            //aa.Add(1, 1);

          //  IntPtr sb = Marshal.StringToCoTaskMemUni("21");

            string a = "a";

            IntPtr aPtr = Marshal.StringToHGlobalAnsi(a);

            IntPtr helloPtr = Marshal.StringToHGlobalAnsi("aaaa");

          //  aa.PopupDialog("a1");

            aa.Messg("哈哈哈哈");

            Console.Write(i);

            Console.Read();

            //    int i;

            //     DemoObjectLib.IMyCOMDemo aaaa=    new DemoObjectLib.MyCOMDemoClass();

        }

    }

　　　　c++代码片段

// MyATLClass.cpp : CMyATLClass 的实现

#include "stdafx.h"

#include "MyATLClass.h"

// CMyATLClass

STDMETHODIMP CMyATLClass::Add(LONG para1, LONG para2)

{

    AFX_MANAGE_STATE(AfxGetStaticModuleState());

    LONG a = para1 + para2;

    AfxMessageBox(a);

    // TODO:  在此添加实现代码

     return S_OK;

}

STDMETHODIMP CMyATLClass::PopupDialog(CHAR* text)

{

    AFX_MANAGE_STATE(AfxGetStaticModuleState());

    // TODO:  在此添加实现代码

    AfxMessageBox((LPCTSTR)text);

    return S_OK;

}

STDMETHODIMP CMyATLClass::Sum(LONG para1, LONG para2, LONG* sum)

{

    AFX_MANAGE_STATE(AfxGetStaticModuleState());

    // TODO:  在此添加实现代码

    *sum = para1 + para2;

    return S_OK;

}

STDMETHODIMP CMyATLClass::Messg(BSTR test)

{

    AFX_MANAGE_STATE(AfxGetStaticModuleState());

    // TODO:  在此添加实现代码

    AfxMessageBox(test);

    return S_OK;

}

码农公寓

上章地址

什么是COM

Component Object Model 组建对象模型

基于接口（Interface）

对象（Object）

举例：IDispatch接口

为什么要使用COM Interop

COM Interop基础概念

RCW基础

定义COM接口

Attributes

接口的继承

定义RCW

ComImport 告诉CLR这个是RCW

extern + InternalCall 函数由CLR内部实现 具有ComImport特性的时候必须使用extern和InternalCall 强制约束

自动生成RCW：TlbImp

TlbImp<tlb_name>

生成Interop Assembly

直接引用即可

VS中Add Reference

使用RCW

创建RCW MyRCW rcw=new MyRCW();

释放RCW GC自动处理 AppDomain Unload 时候 Marshal.ReleaseComObject Marshal.FinalReleaseComObject

调用方法 rew.Func()

Cast

DEMO

相关文章

接口的继承　　　　　　

extern + InternalCall 函数由CLR内部实现具有ComImport特性的时候必须使用extern和InternalCall 强制约束