最新文章 (全部类别)
C# 使用Linq递归查询当前节点及所有子节点
You must install .NET Desktop Runtime to run this application
Swagger生成API接口注释、参数注释、实体模型注释
Failed to load APl definition. response status is 500 /swagger/vl/swagger.json
.NET8/.NETCore 依赖接口注入:自动注入项目中所有接口和自定义类
CSFramework.EF应用 - ASP.NETCore/WebApi使用IDatabase动态代理创建多个数据库实例
CSFramework.EF数据库框架简介
EFCore查询数据报错:SqlNullValueException:“Data is Null. This method or property cannot be called on Null values
使用Photoshop PS制作GIF动画(等待窗体GIF图标)
C# Winform等待窗体WaitingForm组件下载(CSFramework提供)
使用VS2022升级助手将.NETFramework项目升级到.NET8/.NETCore
VS解决方案升级:.NETFramework升级到.NETCore(.NET6~.NET8)
CSFramework.COM C/S软件开发框架视频下载
CSFramework.Authentication 软件证书管理系统 - MAC地址管理
CSFramework.Authentication 软件证书管理系统 - 证书管理
CSFramework.Authentication 软件证书管理系统 - 制作软件授权证书
CSFrameworkV6快速开发框架 - SqlServer(MsSql)数据库测试报告
C/S架构软件开发平台 - 旗舰版V6 软件简介
C/S架构软件开发平台 - 旗舰版V6.1 - 新功能汇总
C/S客户端软件授权设计方案 - MAC地址白名单+软件到期时间授权
C/S客户端软件授权设计方案 - 在线用户并发数+软件到期时间授权
CSFramework.Authentication 软件授权证书管理系统
CSFrameworkV6旗舰版开发框架 - 集成软件授权认证系统
CSFrameworkV6旗舰版-新功能-在线用户查询、设置用户下线
CSFramework.Authentication 软件授权认证系统 - 软件测试报告
CSFrameworkV6旗舰版新功能-客户端软件授权(在线用户并发数+MAC白名单+软件到期时间)
特殊文本符号大全|Word中的特殊文本符号|图案符号
LINQ高级语法:使用ExecuteUpdate方法查询并批量更新数据(Where+Update)
C/S架构软件开发平台 - 旗舰版V6.0 - 底层框架迭代开发
DevExpress v24破解步骤
C#获取应用程序当前文件目录位置(安装路径)
SqlException: 列名 'Discriminator' 无效。
.NET C/S架构软件用户授权设计方案(mac地址+白名单用户)
B/S开发框架NuGet包、组件介绍
C/S框架软件产品客户案例
C/S架构软件开发平台 - 旗舰版V6.0 - 自动创建数据库备份计划
SqlServer自动备份计划,备份多个数据库,自动删除备份文件
CSFrameworkV6快速开发框架 - 两种报表数据源查询方式及优缺点
SqlServer使用xp_cmdshell删除备份文件
SqlServer备份数据库存储过程:p_BackupDB
IWebHostEnvironment接口怎么引用?
Docker Desktop使用指南(Windows操作系统)
VSCode开发工具使用笔记
本地源“C:\Program Files\DevExpress 22.2\Components\System\Components\Packages”不存在
CSFrameworkV6旗舰版-成功案例-合肥联宝MES系统
CSFrameworkV6旗舰版-成功案例-威海广泰MES系统
CSFrameworkV6软件开发框架+达梦数据库(国产数据库)测试报告
国产化软件设计:遵循信创要求,助力信息技术自主创新
DevExpress组件版本下载、安装与VS开发环境 - Winform C/S框架
CSFrameworkV6软件开发框架 - MySql数据库测试报告
.net敏捷开发,创造卓越

Delphi程序调用C#.Net编译的DLL并打开窗体(详解)


  Delphi程序调用C#.Net编译的DLL并打开窗体(详解)

Delphi程序调用C#.Net编译的DLL并打开窗体(详解)



Delphi程序调用C#.Net编译的DLL


最近用C#.Net写了一个公用模块, 本以为仅提供给.Net程序使用, 但是领导要求把这些功能提供给旧系统使用, 天啦, 几套旧系统全是Delphi写的, 我不想再重复写一次,于是尝试编译成COM组件提供给Delphi调用.花了一下午研究技术, 结果很满意, 调试通过, 特分享受出来给大家学习.



实现步骤:



1、生成密钥文件用于给程序集强名称签名(必须)
sn -k MyKey.snk


2、使用强名称签名的Key编译成类库Tester.DLL
csc /t:library /keyfile:MyKey.snk Tester.cs


3、生成类型库 (此tlb文件提供给Delphi导入, 使用OLE方式调用此步可省略了)
tlbexp Tester.dll /out:Tester.tlb



4、生成注册DLL的注册表文件
regasm Tester.DLL /regfile:Tester.reg



5、运行Tester.reg



将上面四个步骤打包成一个BAT文件自动生成DLL, 在运行Delphi程序前请先运行Tester.reg注册COM.
打包Installer,Setup.exe 别忘记打包第5步.


reg.bat 文件内容:

sn -k MyKey.snk

csc /t:library /keyfile:MyKey.snk Tester.cs

tlbexp Tester.dll /out:Tester.tlb

regasm Tester.DLL /regfile:Tester.reg



且看运行效果:


Delphi程序Project1.exe (图片中英文拼写错误,不想改了,sorry!)






点Call DLL按钮成功打开.Net窗体,测试通过!






注意: 开发环境中必须在Visual Studio 2008命令提示中运行reg.bat!!! 如下图:










两种可能的错误提示及解决方案:


1. 出现以下提示说明没有注册COM组件, 请运行Tester.reg.




2. 出现以下提示说明您调用了一个没有签名的.Net方法(无参方法)





Tester程序:



C# Code:

///
<summary>

/// 测试类. 请给所有方法提供一个参数,即使是无用的签名
/// </summary>
public class Tester
{
   
   public string GetMyKey(int param)
   {
      return "Key:www.csframework.com";
   }
   
   public string GetMyName(string input)
   {
      return "Jonny Sun" ":" input;
   }
   
   public int GetMyAge(string yourName)
   {
      return 33;
   }
   
   /// <summary>
   /// 显示消息并打开窗体
   /// </summary>
   /// <param name="msg">消息</param>
   /// <returns></returns>
   public int ShowMessage(string msg)
   {
      MessageBox.Show(msg);
      frmTest.Execute(msg);//打开窗体
      return 100;
   }
   
   /// <summary>
   /// 无签名(参数)的方法给Delphi调用,调用失败,Delphi程序会抛出异常。
   /// </summary>
   /// <returns></returns>
   public int CallMethodWithNoSign()
   {
      return -1;
   }
   
}

// 来源:www.CSFramework.com, C/S结构框架学习网





Delphi Code:

procedure TForm1.Button1Click(Sender: TObject);
var
  OBJ: Variant; //OLEVariant Type.
  ResultValue: string; //Value returned from C#
  i:Integer;//Value returned from C#
begin
  try
    try
      OBJ := CreateOleObject('Dll4DelphiCall.Tester');

      //Test a function with signature.
      ResultValue := OBJ.GetMyName('HELLO!C/S框架网 www.csframework.com');
      ShowMessage(ResultValue);

      ResultValue := OBJ.GetMyAge('JONNY!');
      ShowMessage(ResultValue);

      ResultValue := OBJ.GetMyKey(0);
      ShowMessage(ResultValue);

      i:=OBJ.ShowMessage('Call CSharp Window....(Sender:Delphi Form)');
      ShowMessage(VarToStr(i));//Show result ID from C# function.
    except
      on e: Exception do
      begin
        ShowMessage(e.Message);
      end;
    end;
  finally
    OBJ := Unassigned;
  end;

end;



// 来源:www.CSFramework.com, C/S结构框架学习网





C/S框架网|原创精神.创造价值.打造精品


扫一扫加作者微信
C/S框架网作者微信 C/S框架网|原创作品.质量保障.竭诚为您服务



原创作品,如转载请注明本文来自C/S框架网 www.csframework.com


Delphi/C#源码下载:

版权声明:本文为开发框架文库发布内容,转载请附上原文出处连接
C/S框架网
上一篇:C/S快速开发框架 - 代码自动生成视频下载
下一篇:什么是数据字典? 什么是基础数据? 什么是数据字典窗体?
评论列表

发表评论

评论内容
昵称:
关联文章

Delphi程序调用C#.Net编译DLL打开(详解)
C#调用C++编译DLL详解
C#.Net 调用Delphi 编译ActiveX COM组件(原)
通过反射,调用DLL程序集某个类静态方法打开
C#调用Delphi编译DLL函数库返回大文本数据
打开传入参数
C# 子调用方法(或多之间方法调用)
C# 动态编译调用WebService方法
指定单据号码自动打开业务单据显示数据
自定义按钮权限控制-扩展权限按钮详解
C#打开CHM文件定位到指定页面(原创)
Delphi封装Novell LDAP底层API, 提供给C#.Net开发
C#使用Process类运行外部程序,已运行程序自动还原主
C# 调用API枚举,根据标题还原
创建TreeList及打开TreeListNode.Tag属性对应
C# WebService异步处理/异步调用详解
C#.Net多重继承构造器及Load事件执行顺序详解
打开设计报错:To prevent possible data loss before loading the designer
C#代码混淆及反编译
C#代码混淆及反编译(转)

热门标签
软件著作权登记证书 .NET Reactor .NET5 .NET6 .NET7 .NET8 .NETFramework APP AspNetCore Auth-软件授权注册系统 Axios B/S B/S开发框架 B/S框架 BSFramework Bug Bug记录 C#加密解密 C#源码 C/S CHATGPT CMS系统 CodeGenerator CSFramework.DB CSFramework.EF CSFrameworkV1学习版 CSFrameworkV2标准版 CSFrameworkV3高级版 CSFrameworkV4企业版 CSFrameworkV5旗舰版 CSFrameworkV6.0 CSFrameworkV6.1 CSFrameworkV6旗舰版 DAL数据访问层 Database datalock DbFramework Demo教学 Demo实例 Demo下载 DevExpress教程 Docker Desktop DOM EFCore EF框架 Element-UI EntityFramework ERP ES6 Excel FastReport GIT HR IDatabase IIS JavaScript LINQ MES MiniFramework MIS MySql NavBarControl NETCore Node.JS NPM OMS Oracle资料 ORM PaaS POS Promise API PSD RedGet Redis SAP Schema SEO SEO文章 SQL SQLConnector SqlServer Swagger TMS系统 Token令牌 VS2022 VSCode VS升级 VUE WCF WebApi WebApi NETCore WebApi框架 WEB开发框架 Windows服务 Winform 开发框架 Winform 开发平台 WinFramework Workflow工作流 Workflow流程引擎 XtraReport 安装环境 版本区别 报表 备份还原 踩坑日记 操作手册 达梦数据库 代码生成器 迭代开发记录 功能介绍 国际化 基础资料窗体 架构设计 角色权限 开发sce 开发工具 开发技巧 开发教程 开发框架 开发平台 开发指南 客户案例 快速搭站系统 快速开发平台 框架升级 毛衫行业ERP 秘钥 密钥 权限设计 软件报价 软件测试报告 软件加壳 软件简介 软件开发框架 软件开发平台 软件开发文档 软件授权 软件体系架构 软件下载 软件著作权登记证书 软著证书 三层架构 设计模式 生成代码 实用小技巧 视频下载 收钱音箱 数据锁 数据同步 微信小程序 未解决问题 文档下载 喜鹊ERP 喜鹊软件 系统对接 详细设计说明书 新功能 信创 行政区域数据库 需求分析 疑难杂症 蝇量级框架 蝇量框架 用户管理 用户开发手册 用户控件 在线支付 纸箱ERP 智能语音收款机 自定义窗体 自定义组件 自动升级程序
联系我们
联系电话:13923396219(微信同号)
电子邮箱:23404761@qq.com
站长微信二维码
微信二维码