欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

PB调用C#编写的Dll类库

程序员文章站 2022-07-01 15:44:00
在c# 中编写com组件,供PB调用实例 前言:c#中写的dll直接是不能被pb调用的,只有写成com组件才可以调用,所以用c#写dll时要注意。 c#中新建类库 类库类型为通用类库,项目名为AddCom 1、配置:右键点击解决方案资源管理器中的AddCom,选择“属性”,选择“应用程序”->“程序 ......

在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#中源代码如下

 

using system;
using system.collections.generic;
using system.text;
using system.runtime.interopservices;
namespace addcom
{
    [guid("298d881c-e2a3-4638-b872-73eade25511c")]
    public interface addcominterface
    {
        [dispid(1)]
        int iadd(int a, int b);
    }
    [guid("2c5b7580-4038-4d90-babd-8b83fce5a467")]
    [classinterface(classinterfacetype.none)]

    public class addcomservice : addcominterface
    {
        public addcomservice()
        {
        }
        public int iadd(int a, int b)
        {
            int c = 0;
            c = a + b;
            return c;
        }
    }
}

 

至此,关于c#的dll已经操作完成,下面开始注册

注册dll

注册有两种方法

1、c:\windows\microsoft.net\framework\v2.0.50727\regasm.exe e:\test\mylib.dll /tlb: e:\test\mylib.tlb

反注册:c:\windows\microsoft.net\framework\v2.0.50727\regasm.exe /u e:\test\mylib.dll /tlb: e:\test\mylib.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<>0 then
    
    //连接不成功,先反注册组件,再重新注册组件
    li_cel = run("regasm /u rakblibrary.dll /tlb:rakblibrary.tlb",minimized!)
    if li_cel <> 1 then
        messagebox('提示','反注册失败!')
        return
    
    else
        messagebox('提示','反注册成功!')
        
        li_reg = run("regasm rakblibrary.dll /tlb:rakblibrary.tlb",minimized!)
        if li_reg<>1 then
            messagebox('提示','组件注册失败!')
            return
        else
            messagebox('提示','组件注册成功!')
        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)要放在工程的根目录下,且这几个文件要放在同一目录下