在c# 中编写com组件,供PB调用实例
前言:c#中写的dll直接是不能被pb调用的,只有写成com组件才可以调用,所以用c#写dll时要注意。
c#中新建类库
类库类型为通用类库,项目名为AddCom
1、配置:右键点击解决方案资源管理器中的AddCom,选择“属性”,选择“应用程序”->“程序集信息”,勾选“使程序集COM可见”,然后点击“生成”,选择“为COM互操作注册”
2、打开AssemblyInfo.cs文件,设置[assembly: ComVisible(true)],如果不改则不能被其他程序调用
3、编写com组件会用到guid(全球唯一ID),编写com组件必须要用到。c#会默认生成一个放在AssemblyInfo.cs,如没有生成,可以用GUID生成器生成,也可以网上下一个生成guid的软件
4、c#中源代码如下
usingSystem;usingSystem.Collections.Generic;usingSystem.Text;usingSystem.Runtime.InteropServices;namespaceAddCom
{
[Guid("298D881C-E2A3-4638-B872-73EADE25511C")]public interfaceAddComInterface
{
[DispId(1)]int iadd(int a, intb);
}
[Guid("2C5B7580-4038-4d90-BABD-8B83FCE5A467")]
[ClassInterface(ClassInterfaceType.None)]public classAddComService : AddComInterface
{publicAddComService()
{
}public int iadd(int a, intb)
{int c = 0;
c= a +b;returnc;
}
}
}
至此,关于C#的Dll已经操作完成,下面开始注册
注册DLL
注册有两种方法
1、C:WINDOWSMicrosoft.NETFrameworkv2.0.50727RegAsm.exe E:TestMyLib.dll /tlb: E:TestMyLib.tlb
反注册:C:WINDOWSMicrosoft.NETFrameworkv2.0.50727RegAsm.exe /u E:TestMyLib.dll /tlb: E:TestMyLib.tlb
( 这个地址是安装Framework的物理地址,根据自己电脑不同进行修改)得到下面图所示即成功注册
2、run("regasm MyLib.dll /tlb: MyLib.tlb",minimized!)
前提是把regasm.exe文件复制到当前项目中
PB调用DLL
pb中利用ole调用来调用com组件
OLEObject OLEObject
long li_status
int li_reg
int li_cel
string a= "aa"string b= "bb"
//创建OLEObject对象
OLEObject=Create OLEObject//创建连接
li_status= OLEObject.ConnectToNewObject("RakbLibrary.Class1")if li_status<>0then//连接不成功,先反注册组件,再重新注册组件
li_cel= run("regasm /u RakbLibrary.dll /tlb:RakbLibrary.tlb",minimized!)if li_cel <> 1then
messagebox('提示','反注册失败!')return
elsemessagebox('提示','反注册成功!')
li_reg= run("regasm RakbLibrary.dll /tlb:RakbLibrary.tlb",minimized!)if li_reg<>1then
messagebox('提示','组件注册失败!')return
elsemessagebox('提示','组件注册成功!')end if
end if
else
//调用类内的公共函数
li_res = OLEObject.getForm(a,b)end if
//释放资源
OLEObject.DisConnectObject()
如果返回值是-3 ,Object could not be created 生成exe执行文件就好了
注意:li_status 连接状态是0则说明连接DLL成功,否则可能就是DLL没有注册成功,需要重新注册一下(注册是时候最好先反注册一下)
li_cel 注册状态为1则说明注册成功
OLEObject.DisConnectObject()释放资源要放在调用DLL类库的函数之后,否则会接收不到该函数的返回值
所有需要的文件(C#的dll文件和tlb文件,regasm.exe)要放在工程的根目录下,且这几个文件要放在同一目录下