C#动态调用系统DLL函数的类（改进版）

http://blog.csdn.net/KAMILLE/archive/2008/01/15/2045459.aspx

几个月前写的版本，使用反射性能不够好，而且使用不够方便。这个版本使用接口定义，性能接近系统的DllImport。支持.net1.0。（如果是.net2.0可以使用Delegate转换函数指针）

1. using System;
2. using System.Reflection;
3. using System.Reflection.Emit;
4. using System.Runtime.InteropServices;
6. public class DllImporter
7. {
8.     [DllImport("Kernel32.dll")]
9.     static extern IntPtr LoadLibrary(string lpFileName);
10.     [DllImport("Kernel32.dll")]
11.     static extern IntPtr GetProcAddress(IntPtr hModule, string lpProcName);
12.     [DllImport("Kernel32.dll")]
13.     static extern bool FreeLibrary(IntPtr hModule);
15.     public static object Create(string dllFile, Type interfaceType)
16.     {
17.         //检查参数
18.         if (dllFile == null) throw new ArgumentNullException();
19.         if (interfaceType.IsInterface == false) throw new ArgumentException();
21.         //函数指针( 这里其实要释放的，偷懒:P )
22.         IntPtr libPtr = LoadLibrary(dllFile);
23.         if (libPtr == IntPtr.Zero) throw new DllNotFoundException(dllFile);
25.         //创建模块
26.         AssemblyName assemblyName = new AssemblyName();
27.         assemblyName.Name = "DynamicAssembly";
28.         AssemblyBuilder assemblyBuilder = AppDomain.CurrentDomain.DefineDynamicAssembly(assemblyName, AssemblyBuilderAccess.Run);
29.         ModuleBuilder moduleBuilder = assemblyBuilder.DefineDynamicModule("DynamicModule");
31.         //创建类型
32.         TypeBuilder type = moduleBuilder.DefineType("DynamicType", TypeAttributes.Class, typeof(Object), new Type[] { interfaceType });
34.         //创建方法
35.         MethodInfo[] methods = interfaceType.GetMethods();
36.         foreach (MethodInfo method in methods)
37.         {
38.             IntPtr procPtr = GetProcAddress(libPtr, method.Name);
39.             if (procPtr == IntPtr.Zero) throw new EntryPointNotFoundException(method.Name);
41.             MethodAttributes attribute = method.Attributes & ~(MethodAttributes.Abstract);
42.             Type returnType = method.ReturnType;
44.             ParameterInfo[] parameters = method.GetParameters();
45.             Type[] argumentsType = new Type[parameters.Length];
46.             for (int i = 0; i < parameters.Length; i++)
47.                 argumentsType[i] = parameters[i].ParameterType;
49.             MethodBuilder methodBuilder = type.DefineMethod(method.Name, attribute, returnType, argumentsType);
50.             ILGenerator ilGen = methodBuilder.GetILGenerator();
51.             for (int i = 0; i < argumentsType.Length; i++)
52.                 ilGen.Emit(OpCodes.Ldarg, i + 1);   //注意这里从1开始,0是this
53.             if (IntPtr.Size == 4) ilGen.Emit(OpCodes.Ldc_I4, (int)procPtr);
54.             else if (IntPtr.Size == 8) ilGen.Emit(OpCodes.Ldc_I8, (long)procPtr);
55.             ilGen.EmitCalli(OpCodes.Calli, CallingConvention.StdCall, returnType, argumentsType);
56.             ilGen.Emit(OpCodes.Ret);
57.             //显式接口方法需要定义 Override，而普通实现不需要。     
58.             type.DefineMethodOverride(methodBuilder, method);
59.         }
61.         //FreeLibrary(libPtr);
63.         //创建类型
64.         return Activator.CreateInstance(type.CreateType());
65.     }
66. }
68. public class Test
69. {
70.     public interface Iuser32
71.     {
72.         IntPtr GetDC(IntPtr hWnd);
73.         int ReleaseDC(IntPtr hWnd, IntPtr hDC);
74.     }
75.     public interface Igdi32
76.     {
77.         bool TextOutA(IntPtr hdc, int nXStart, int nYStart, string lpString, int cbString);
78.         uint SetTextColor(IntPtr hdc, uint crColor);
79.     }
80.     static void Main(string[] args)
81.     {
82.         Iuser32 user32 = DllImporter.Create("user32.dll", typeof(Iuser32)) as Iuser32;
83.         Igdi32 gdi32 = DllImporter.Create("gdi32.dll", typeof(Igdi32)) as Igdi32;
85.         IntPtr dc = user32.GetDC(IntPtr.Zero);
86.         gdi32.SetTextColor(dc, 0xff);
87.         int x = 0; int y = 0; int sx = 1; int sy = 1;
88.         for (int i = 0; i < 10000; i++)
89.         {
90.             if (x > 1024 || x < 0) sx *= -1;
91.             if (y > 768 || y < 0) sy *= -1;
92.             x += sx;
93.             y += sy;
94.             gdi32.TextOutA(dc, x, y, "hello", 5);
95.             System.Threading.Thread.Sleep(5);
96.         }
97.         user32.ReleaseDC(IntPtr.Zero, dc);
98.     }
99. }