扫一扫
分享文章到微信
扫一扫
关注官方公众号
至顶头条
几个关键技术点:
1 C#要以非托管方式调用DLL
2 C#把整理好的画图数据生成事先定义好格式的XML文件,传给DLL
3 DLL解析XML文件,根据相应格式,要求,画图
4 DLL输出GIF文件(经过比较GIF图像失真率小,且文件大小最小)
5 C#装载GIF文件,传到前台展示
关键代码:
C#
以下是引用片段: #region 定义调用Delphi写的画图DLL /// /// 定义调用Delphi写的画图DLL /// private class DrawChartFromDll { //定义DLL文件名,此文件路径要加到系统Path中 private const string _fileDll = @"Chart.dll"; //调用非托管Dll,GetChartFromXMLByNet是ChartAccess.dll公开的函数名称 [DllImport(_fileDll, EntryPoint = "GetChartFromXMLByNet", CharSet = CharSet.Ansi, CallingConvention = CallingConvention.StdCall)] //C#中的申明 public static extern int GetChartFromXMLByNet(int piChartType, string psXMLFileName, string psPriChartFileName, string psSecChartFileName, string psPriHotFileName, string psSecHotFileName); } #endregion public ChartResultData GetCharts(ChartData _ChartData, Hashtable _HotPriAdditionSeqNo, Hashtable _HotSecAdditionSeqNo) { //根据数据生成XML文件 string _xmlFileName = ""; ChartResultData _ChartResultData = new ChartResultData(); try { _xmlFileName = this.ConvertDataToXml(_ChartData); } catch (Exception err) { _ChartResultData.ErrMessage = err.Message; } ... //调用DELPHI,取得返回参数 int _return = -1; try { _return = DrawChartFromDll.GetChartFromXMLByNet(m_chartType, _xmlFileName, _priChartFileName, _secChartFileName, _priHotFileName, _secHotFileName); } catch (Exception err) { if (_return > 0) { //删除临时生成的XML文件 this.DeleteTempFile(_xmlFileName); this.DeleteTempFile(_priChartFileName); this.DeleteTempFile(_secChartFileName); this.DeleteTempFile(_priHotFileName); this.DeleteTempFile(_secHotFileName); _ChartResultData.ErrMessage = err.Message; return _ChartResultData; } else { //可能因为安全性问题,在频繁连续调用DLL方法时有可能出现內存保护错误信息,虽然出错,但方法已经正确调用并能返回正确的值,此时可以忽略此错误 _return = 0; } } //删除临时生成的XML文件 this.DeleteTempFile(_xmlFileName); ... } |
Delphi
没有什么特别的注意事项,和其它的DLL基本一样,注意string换成PChar就可以了。
以下是引用片段: function GetChartFromXMLByNet(piChartType: integer; psXMLFileName: PChar; psPriChartFileName: PChar; psSecChartFileName: PChar; out psPriHotMsg: PChar; out psSecHotMsg: PChar): integer; stdcall;export; |
结构图:
如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。
现场直击|2021世界人工智能大会
直击5G创新地带,就在2021MWC上海
5G已至 转型当时——服务提供商如何把握转型的绝佳时机
寻找自己的Flag
华为开发者大会2020(Cloud)- 科技行者