提供3000多款全球软件/控件产品
针对软件研发的各个阶段提供专业培训与技术咨询
根据客户需求提供定制化的软件开发服务
全球知名设计软件,显著提升设计质量
打造以经营为中心,实现生产过程透明化管理
帮助企业合理产能分配,提高资源利用率
快速打造数字化生产线,实现全流程追溯
生产过程精准追溯,满足企业合规要求
以六西格玛为理论基础,实现产品质量全数字化管理
通过大屏电子看板,实现车间透明化管理
对设备进行全生命周期管理,提高设备综合利用率
实现设备数据的实时采集与监控
利用数字化技术提升油气勘探的效率和成功率
钻井计划优化、实时监控和风险评估
提供业务洞察与决策支持实现数据驱动决策
原创|其它|编辑:郝浩|2009-04-07 09:20:19.000|阅读 3485 次
概述:动态调用DLL事例代码
#慧都22周年庆大促·界面/图表报表/文档/IDE/IOT/测试等千款热门软控件火热促销中>>
调用方法:
object obj = WinDllInvoke("Kernel32.dll", "Beep", new object[] { 750, 300 }, typeof(void));
函数代码:
1 [System.Runtime.InteropServices.DllImport("kernel32")]
2 private static extern IntPtr LoadLibrary(string lpLibFileName);
3
4 [System.Runtime.InteropServices.DllImport("kernel32")]
5 private static extern IntPtr GetProcAddress(IntPtr hModule, string lpProcName);
6
7 [System.Runtime.InteropServices.DllImport("kernel32")]
8 private static extern IntPtr FreeLibrary(IntPtr hLibModule);
9
10 ///
11 /// 动态调用DLL
12 ///
13 /// Dll文件名
14 /// 待调用的函数名
15 /// 函数参数
16 /// 返回值
17 /// 调用结果
18 private static object WinDllInvoke(string fileName, string funName, object[] objParams, Type returnType)
19 {
20 IntPtr libHandle = IntPtr.Zero;
21
22 try
23 {
24 //获取函数地址
25 libHandle = LoadLibrary(fileName);
26 if (libHandle == IntPtr.Zero) return null;
27 IntPtr procAddres = GetProcAddress(libHandle, funName);
28 if (procAddres == IntPtr.Zero) return null;
29
30 //获取参数类型
31 Type[] paramTypes = new Type[objParams.Length];
32 for (int i = 0; i < objParams.Length; ++i)
33 {
34 paramTypes[i] = objParams[i].GetType();
35 }
36
37 //构建调用方法模型
38 AssemblyName asembyName = new AssemblyName();
39 asembyName.Name = "WinDllInvoke_Assembly";
40 AssemblyBuilder asembyBuilder = AppDomain.CurrentDomain.DefineDynamicAssembly(asembyName, AssemblyBuilderAccess.Run);
41 ModuleBuilder moduleBuilder = asembyBuilder.DefineDynamicModule("WinDllInvoke");
42 MethodBuilder methodBuilder = moduleBuilder.DefineGlobalMethod("InvokeFun", MethodAttributes.Public | MethodAttributes.Static, returnType, paramTypes);
43
44 //获取一个 ILGenerator ,用于发送所需的 IL
45 ILGenerator IL = methodBuilder.GetILGenerator();
46 for (int j = 0; j < paramTypes.Length; ++j)
47 {
48 //将参数压入堆栈
49 if (paramTypes[j].IsValueType)
50 {
51 IL.Emit(OpCodes.Ldarg, j); //By Value
52 }
53 else
54 {
55 IL.Emit(OpCodes.Ldarga, j); //By Addrsss
56 }
57 }
58
59 // 判断处理器类型
60 if (IntPtr.Size == 4)
61 {
62 IL.Emit(OpCodes.Ldc_I4, procAddres.ToInt32());
63 }
64 else if (IntPtr.Size == 8)
65 {
66 IL.Emit(OpCodes.Ldc_I8, procAddres.ToInt64());
67 }
68 else
69 {
70 throw new PlatformNotSupportedException("不好意思,偶不认得你哦!");
71 }
72
73 IL.EmitCalli(OpCodes.Calli, CallingConvention.StdCall, returnType, paramTypes);
74 IL.Emit(OpCodes.Ret); // 返回值
75 moduleBuilder.CreateGlobalFunctions();
76
77 // 取得方法信息
78 MethodInfo methodInfo = moduleBuilder.GetMethod("InvokeFun");
79
80 return methodInfo.Invoke(null, objParams);// 调用方法,并返回其值
81 }
82 catch { return null; }
83 finally
84 {
85 if (libHandle != IntPtr.Zero) FreeLibrary(libHandle); //释放资源
86 }
87 }
本站文章除注明转载外,均为本站原创或翻译。欢迎任何形式的转载,但请务必注明出处、不得修改原文相关链接,如果存在内容上的异议请邮件反馈至chenjj@hmdbvip.cn
文章转载自:自互联网



接DevExpress原厂商通知,将于近日上调旗下产品授权价格,现在下单客户可享受优惠报价!
面对“数字中国”建设和中国制造2025战略实施的机遇期,中车信息公司紧跟时代的步伐,以“集约化、专业化、标准化、精益化、一体化、平台化”为工作目标,大力推进信息服务、工业软件等核心产品及业务的发展。在慧都3D解决方案的实施下,清软英泰建成了多模型来源的综合轻量化显示平台、实现文件不失真的百倍压缩比、针对模型中的大模型文件,在展示平台上进行流畅展示,提升工作效率,优化了使用体验。
本站的模型资源均免费下载,登录后即可下载。模型仅供学习交流,勿做商业用途。
本站的模型资源均免费下载,登录后即可下载。模型仅供学习交流,勿做商业用途。
服务电话
重庆/ 023-68661681
华东/ 13452821722
华南/ 18100878085
华北/ 17347785263
客户支持
技术支持咨询服务
服务热线:400-700-1020
邮箱:sales@hmdbvip.cn
关注我们
地址 : 重庆市九龙坡区火炬大道69号6幢
永利最大(官方)网站