===================================================================
本文阐述如何用C#创建COM组件，并能用VB6.0等调用。附有完整测试通过的代码。该功能总体看来很简单，实际值得注意的地方还是挺多。因为很少有人写这类文章，有些代码也是转来转去的不全，有些甚至让人误入歧途。后来在C# help上面看一个老外写的文章 (上面有一个完整的SQL SERVER实例），才完成该功能。拿来分享。
开发工具：VS2008
附：本文适用任何VS系列工具。
在用C#创建COM组件时，一定要记住以下几点：
1。所要导出的类必须为公有；
2。所有属性、方法也必须为公有；
3。要导出的属性、方法必须用接口方式；如果没有在接口中声明，即使该方法（属性）为公有，也不能正常导出到COM。但他们可以被别的.NET程序所使用；
4。所有的事件也必须用接口方式；
现在开始正题：
一、新建一个Visual C#工程（习惯这种叫法了，现在应该叫解决方案），选择类型“类库”；就叫MyCom吧。
二、编写导出接口。为了大家理解方便，仅以一加法操作举例。如下：
[Guid("154BD6A6-5AB8-4d7d-A343-0A68AB79470B")]
public
Guid为全局唯一标识，可以用VS2008的命令提示符中输入：用guidgen工具(系统自带)可以产生guid，在几个复选框选择最后一个Registry Format，点击New Guid,然后COPY就行了（以下如有guid的字符串，可用同样操作产生）
[DispId(1)]为函数的标识。如果有多个函数可相应的在函数前面加[DispId(2)], [DispId(3)]…
三、创建事件接口。
[Guid("D11FEA37-AC57-4d39-9522-E49C4F9826BB"),
public
}
Guid同二，不多说
InterfaceType表示向COM公开的方式，这里选择为以调度的方式向COM公开。
四、 创建具体类：
[Guid("2E3C7BAD-1051-4622-9C4C-215182C6BF58"),
public
}
至此，代码完毕。很简单吧。别急，后面来有常常被忽略的步骤，先把整体代码放在下面（注意引用InteropServices）：using
五、大家都知道COM是需要注册的。注册时要加密钥文件.SNK。这一部就是生成SNK文件。进入VS2008命令提示符。用命令：sn –k MyCom.snk回车。我的在E:\vs2008\vc下面就生成了一个（MyCom.snk）的文件。（你们可以根据自己的命令提示符所在的文件目录下去找）。然后把它COPY到你的工程根目录下。
六、打开AssemblyInfo.cs。在里面加入[assembly:AssemblyKeyFile("MyCom.snk")]
七、(1)项目属性->应用程序->程序集信息->选中“使程序集COM可见”(英文版 - Make assembly Com-Visible
八、生成。如果在Debug下有一个MyCom.tlb，那你就成功了（肯定还有MyCom.dll）要此tlb文件是为了在VB6.0里面测试。
九、在VB里面建一个Stardard EXE工程（这个最方便）。建好后，到主菜单的项目->引用里选中MyCom，点ok。
十、在Form_Load事件里加入如下代码：
Dim o, a, b, s
Set o = CreateObject("MyCom.Class1")
a = 3
b = 6
s = o.Add(a, b)
MsgBox s
运行代码，当弹出一个9，就说明你已经成功地在vb6.0下调用C#创建COM组件了。
========================
http://msdn.microsoft.com/zh-cn/library/aa686045.aspx
大家在实际工作学习C#的时候，可能会问：为什么我们要为一些已经存在的功能（比如 Windows中的一些功能，C++中已经编写好的一些方法）要重新编写代码，C#有没有方法可以直接都用这些原本已经存在的功能呢？答案是肯定的，大家 可以通过C#中的DllImport直接调用这些功能。
DllImport所在的名字空间 using System.Runtime.InteropServices;
MSDN中对DllImportAttribute的解释是这样的：可将该属性应用于方法。DllImportAttribute 属性提供对从非托管 DLL 导出的函数进行调用所必需的信息。作为最低要求，必须提供包含入口点的 DLL 的名称。
DllImport 属性定义如下：
namespace System.Runtime.InteropServices
{
[AttributeUsage(AttributeTargets.Method)]
public class DllImportAttribute: System.Attribute
{
public DllImportAttribute(string dllName) {...}
public CallingConvention CallingConvention;
public CharSet CharSet;
public string EntryPoint;
public bool ExactSpelling;
public bool PreserveSig;
public bool SetLastError;
public string Value { get {...} }
}
}
说明：
1、DllImport只能放置在方法声明上。
2、DllImport具有单个定位参数：指定包含被导入方法的 dll 名称的 dllName 参数。
3、DllImport具有五个命名参数：
a、CallingConvention 参数指示入口点的调用约定。如果未指定 CallingConvention，则使用默认值 CallingConvention.Winapi。
b、CharSet 参数指示用在入口点中的字符集。如果未指定 CharSet，则使用默认值 CharSet.Auto。
c、EntryPoint 参数给出 dll 中入口点的名称。如果未指定 EntryPoint，则使用方法本身的名称。
d、ExactSpelling 参数指示 EntryPoint 是否必须与指示的入口点的拼写完全匹配。如果未指定 ExactSpelling，则使用默认值 false。
e、PreserveSig 参数指示方法的签名应当被保留还是被转换。当签名被转换时，它被转换为一个具有 HRESULT 返回值和该返回值的一个名为 retval 的附加输出参数的签名。如果未指定 PreserveSig，则使用默认值 true。
f、SetLastError 参数指示方法是否保留 Win32"上一错误"。如果未指定 SetLastError，则使用默认值 false。
4、它是一次性属性类。
5、此外，用 DllImport 属性修饰的方法必须具有 extern 修饰符。
========================================================
DllImport属性应用于方法，要求最少要提供包含入口点的dll的名称。
DllImport的定义如下：
[AttributeUsage(AttributeTargets.Method)]用法示例：
public class DllImportAttribute: System.Attribute
{
public DllImportAttribute(string dllName) {…} //定位参数为dllName
public CallingConvention CallingConvention; //入口点调用约定
public CharSet CharSet; //入口点采用的字符接
public string EntryPoint; //入口点名称
public bool ExactSpelling; //是否必须与指示的入口点拼写完全一致，默认false
public bool PreserveSig; //方法的签名是被保留还是被转换
public bool SetLastError; //FindLastError方法的返回值保存在这里
public string Value { get {…} }
}
[DllImport("kernel32")]
private static extern long WritePrivateProfileString(string section,string key,string val,string filePath);
以上是用来写入ini文件的一个win32api。
用此方式调用Win32API的数据类型对应：DWORD=int或uint，BOOL=bool，预定义常量=enum，结构=struct。
DllImport会按照顺序自动去寻找的地方： 1、exe所在目录 2、System32目录 3、环境变量目录所以只需要你把引用的DLL 拷贝到这三个目录下 就可以不用写路径了 或者可以这样server.MapPath(.\bin\*.dll)web中的，同时也是应用程序中的 后来发现用[DllImport(@"C:\OJ\Bin\Judge.dll")]这样指定DLL的绝对路径就可以正常装载。 这个问题最常出现在使用 第三方非托管DLL组件的时候,我的也同样是这时出的问题,Asp.Net Team的官方解决方案如下: 首先需要确认你引用了哪些组件,那些是托管的,哪些是非托管的.托管的很好办,直接被使用的需要引用,间接使用的需要拷贝 到bin目录下.非托管的处理会比较麻烦.实际上,你拷贝到bin没有任何帮助,因为CLR会把文件拷贝到一个临时目录下,然后在那运行web,而CLR 只会拷贝托管文件,这就是为什么我们明明把非托管的dll放在了bin下却依然提示不能加载模块了. 具体做法如下: 首先我们在服务器上随便找个地 方新建一个目录,假如为C:\DLL 然后,在环境变量中,给Path变量添加这个目录 最后,把所有的非托管文件都拷贝到C:\DLL中. 或者 更干脆的把DLL放到system32目录 对于可以自己部署的应用程序，这样未偿不是一个解决办法，然而，如果我们用的是虚拟空间，我们是没办法把注 册PATH变量或者把我们自己的DLL拷到system32目录的。同时我们也不一定知道我们的Dll的物理路径。 DllImport里面只能用字符 串常量，而不能够用Server.MapPath(@"~/Bin/Judge.dll")来确定物理路径。ASP.NET中要使用DllImport 的，必须在先“using System.Runtime.InteropServices;”不过，我发现，调用这种"非托管Dll”相当的慢，可能是因为我的方法需要远程验证 吧，但是实在是太慢了。经过一翻研究，终于想到了一个完美的解决办法首先我们用
[DllImport("kernel32.dll")]
private extern static IntPtr LoadLibrary(String path);
[DllImport("kernel32.dll")]
private extern static IntPtr GetProcAddress(IntPtr lib, String funcName);
[DllImport("kernel32.dll")]
private extern static bool FreeLibrary(IntPtr lib);
分别取得了LoadLibrary和GetProcAddress函数的地址，再通过这两个函数来取得我们的DLL里面的函数。
我们可以先用Server.MapPath(@"~/Bin/Judge.dll")来取得我们的DLL的物理路径，然后再用LoadLibrary进行载入，最后用GetProcAddress取得要用的函数地址
以下自定义类的代码完成LoadLibrary的装载和函数调用：
public class DllInvoke
{
[DllImport("kernel32.dll")]
private extern static IntPtr LoadLibrary(String path);
[DllImport("kernel32.dll")]
private extern static IntPtr GetProcAddress(IntPtr lib, String funcName);
[DllImport("kernel32.dll")]
private extern static bool FreeLibrary(IntPtr lib);
private IntPtr hLib;
public DllInvoke(String DLLPath)
{
hLib = LoadLibrary(DLLPath);
}
~DllInvoke()
{
FreeLibrary(hLib);
}
//将要执行的函数转换为委托
public Delegate Invoke(String APIName,Type t)
{
IntPtr api = GetProcAddress(hLib, APIName);
return (Delegate)Marshal.GetDelegateForFunctionPointer(api,t);
}
}
下面代码进行调用
public delegate int Compile(String command, StringBuilder inf);
//编译
DllInvoke dll ＝ new DllInvoke(Server.MapPath(@"~/Bin/Judge.dll"));
Compile compile = (Compile)dll.Invoke("Compile", typeof(Compile));
StringBuilder inf;
compile(@“gcc a.c -o a.exe“,inf);//这里就是调用我的DLL里定义的Compile函数
========================================================
DllImport的用法：
DllImport("MyDllImport.dll")]
private static extern int mySum(int a,int b);
一 在C#程序设计中使用Win32类库
常用对应类型：
1、DWORD 是 4 字节的整数，因此我们可以使用 int 或 uint 作为 C# 对应类型。
2、bool 类型与 BOOL 对应。
示例一：调用 Beep() API 来发出声音
Beep() 是在 kernel32.lib 中定义的，在MSDN 中的定义，Beep具有以下原型：
BOOL Beep(DWORD dwFreq, // 声音频率
DWORD dwDuration // 声音持续时间);
用 C# 编写以下原型：
[DllImport("kernel32.dll")]
public static extern bool Beep(int frequency, int duration);
示例二：枚举类型和常量
MessageBeep() 是在 user32.lib 中定义的，在MSDN 中的定义，MessageBeep具有以下原型：
BOOL MessageBeep(UINT uType // 声音类型
);
用C#编写一下原型：
public enum BeepType
{
SimpleBeep = -1,
IconAsterisk = 0x00000040,
IconExclamation = 0x00000030,
IconHand = 0x00000010,
IconQuestion = 0x00000020,
Ok = 0x00000000,
}
uType 参数实际上接受一组预先定义的常量，对于 uType 参数，使用 enum 类型是合乎情理的。
[DllImport("user32.dll")]
public static extern bool MessageBeep(BeepType beepType);
示例三：处理结构
有时我需要确定我笔记本的电池状况。Win32 为此提供了电源管理函数，搜索 MSDN 可以找到GetSystemPowerStatus() 函数。
BOOL GetSystemPowerStatus(
LPSYSTEM_POWER_STATUS lpSystemPowerStatus
);
此函数包含指向某个结构的指针，我们尚未对此进行过处理。要处理结构，我们需要用 C# 定义结构。我们从非托管的定义开始：
typedef struct _SYSTEM_POWER_STATUS {
BYTE ACLineStatus;
BYTE BatteryFlag;
BYTE BatteryLifePercent;
BYTE Reserved1;
DWORD BatteryLifeTime;
DWORD BatteryFullLifeTime;
} SYSTEM_POWER_STATUS, *LPSYSTEM_POWER_STATUS;
然后，通过用 C# 类型代替 C 类型来得到 C# 版本。
struct SystemPowerStatus
{
byte ACLineStatus;
byte batteryFlag;
byte batteryLifePercent;
byte reserved1;
int batteryLifeTime;
int batteryFullLifeTime;
}
这样，就可以方便地编写出 C# 原型：
[DllImport("kernel32.dll")]
public static extern bool GetSystemPowerStatus(
ref SystemPowerStatus systemPowerStatus);
在此原型中，我们用“ref”指明将传递结构指针而不是结构值。这是处理通过指针传递的结构的一般方法。
此函数运行良好，但是最好将 ACLineStatus 和 batteryFlag 字段定义为 enum：
enum ACLineStatus: byte
{
Offline = 0,
Online = 1,
Unknown = 255,
}
enum BatteryFlag: byte
{
High = 1,
Low = 2,
Critical = 4,
Charging = 8,
NoSystemBattery = 128,
Unknown = 255,
}
请注意，由于结构的字段是一些字节，因此我们使用 byte 作为该 enum 的基本类型
示例四：处理字符串
二 C# 中调用C++代码
int 类型
[DllImport(“MyDLL.dll")]
//返回个int 类型
public static extern int mySum (int a1,int b1);
//DLL中申明
extern “C” __declspec(dllexport) int WINAPI mySum(int a2,int b2)
{
//a2 b2不能改变a1 b1
//a2=..
//b2=...
return a+b;
}
//参数传递int 类型
public static extern int mySum (ref int a1,ref int b1);
//DLL中申明
extern “C” __declspec(dllexport) int WINAPI mySum(int *a2,int *b2)
{
//可以改变 a1, b1
*a2=...
*b2=...
return a+b;
}
DLL 需传入char *类型
[DllImport(“MyDLL.dll")]
//传入值
public static extern int mySum (string astr1,string bstr1);
//DLL中申明
extern “C” __declspec(dllexport) int WINAPI mySum(char * astr2,char * bstr2)
{
//改变astr2 bstr 2 ，astr1 bstr1不会被改变
return a+b;
}
DLL 需传出char *类型
[DllImport(“MyDLL.dll")]
// 传出值
public static extern int mySum (StringBuilder abuf, StringBuilder bbuf );
//DLL中申明
extern “C” __declspec(dllexport) int WINAPI mySum(char * astr,char * bstr)
{
//传出char * 改变astr bstr -->abuf, bbuf可以被改变
return a+b;
}
DLL 回调函数
BOOL EnumWindows(WNDENUMPROC lpEnumFunc, LPARAM lParam)
using System;
using System.Runtime.InteropServices;
public delegate bool CallBack(int hwnd, int lParam); //定义委托函数类型
public class EnumReportApp
{
[DllImport("user32")]
public static extern int EnumWindows(CallBack x, int y);
public static void Main() {
CallBack myCallBack = new CallBack(EnumReportApp.Report); EnumWindows(myCallBack, 0);
}
public static bool Report(int hwnd, int lParam)
{
Console.Write("Window handle is ");
Console.WriteLine(hwnd); return true;
}
}
DLL 传递结构
BOOL PtInRect(const RECT *lprc, POINT pt);
using System.Runtime.InteropServices;
[StructLayout(LayoutKind.Sequential)]
public struct Point {
public int x;
public int y;
}
[StructLayout(LayoutKind.Explicit)]
public struct Rect
{
[FieldOffset(0)] public int left;
[FieldOffset(4)] public int top;
[FieldOffset(8)] public int right;
[FieldOffset(12)] public int bottom;
}
Class XXXX {
[DllImport("User32.dll")]
public static extern bool PtInRect(ref Rect r, Point p);
}
