.net DLL 注册 regasm delphi调用

.net DLL 注册 regasm

regasm

regasm myTest.dll

regasm.exe

打开vs2005自带的工具“Visual Studio 2005命令提示”,输入上述命令

在没有安装vs开发环境的电脑上,必须安装。net framwork环境2.0以上,或根据项目要求安装合适的framwork版本。

不能再普通的cmd命令下执行,找不到命令。

进入普通的cmd窗口

cd C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727

进入这个目录下,再执行regasm命令就可以识别了。

C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\regasm d:\app\mytest.dll

C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\regasm MyEnCrypt.dll /tlb:MyEncrypt.tlb

C:\WINDOWS\Microsoft.NET\Framework\v4.0.30319\regasm test.dll /tlb:test.tlb

C:\WINDOWS\Microsoft.NET\Framework\v4.0.30319\regasm IMComInterface.dll /tlb:IMComInterface.tlb

C:\WINDOWS\Microsoft.NET\Framework\v4.0.30319\regasm IMComInterface.dll

32位系统

C:\Windows\Microsoft.NET\Framework\v2.0.50727\regasm.exe IMComInterface.dll

C:\Windows\Microsoft.NET\Framework\v4.0.30319\regasm.exe IMComInterface.dll

64位系统(不能用)win10也用32位注册。

C:\Windows\Microsoft.NET\Framework64\v2.0.50727\regasm.exe IMComInterface.dll

C:\Windows\Microsoft.NET\Framework64\v4.0.30319\regasm.exe IMComInterface.dll

C:\Windows\Microsoft.NET\Framework64\v2.0.50727\regasm.exe /u IMComInterface.dll

C:\Windows\Microsoft.NET\Framework64\v4.0.30319\regasm.exe /u IMComInterface.dll

有的dll只能用4.0注册,2.0注册失败。

RegAsm : error RA0000 : “E:\MYDEV\test.dll”不是有效的 .NET 程序集,因 此未能加载它

delphi调用

方法一

打开vs2005自带的工具“Visual Studio 2005命令提示”,输入 TlbExp 路径/TestClass.dll 得到一个TestClass.tlb 文件。

打开Delphi,选择“Project”--“import type library”找到刚才的TestClass.tlb,点击 CreateUnit,生成生成的TLB的pas文件

var aClass: TestClass;

begin

aClass : = CoTestClass.Create;

aClass. end;

方法二、不需生成tlb文件,仿照调用Excel的方式。代码如下:

var aClass: Variant;

begin

aClass:= CreateOleObject('TestDll.TestClass');

aClass.('参数');

end;

vs2015 c#封装com文件

Properties\AssemblyInfo.cs

[assembly: ComVisible(true)];//从fasel改为true

也可以在工程里改

右键单击工程--》属性--》应用程序--》点击程序集信息--》最下面的复选框(使程序集Com可见)

TlbExp 路径/TestClass.dll 得到一个TestClass.tlb 文件

regasm MyEnCrypt.dll /tlb:MyEncrypt.tlb

TlbExp TestClass.dll

查找delphi生成的TLb文件里的

Co*** = class

class function Create: **ComInterface;

class function CreateRemote(const MachineName: string): **ComInterface;

end;

imcom:IMComInterface_TLB._CIMComInterface;

imcom := IMComInterface_TLB.CoCIMComInterface.Create;

C++

IMComInterface_TLB.cpp

const GUID CLSID_CIMComInterface =

_CIMComInterface *imcom = CoCIMComInterface::Create();

不用看TLB.h文件了。根据TLB.cpp就可以知道名称进行定义和create了。

IMComInterface_TLB.h

_CIMComInterface *imcom = CoCIMComInterface::Create();

typedef TCoClassCreatorT<TCOM_CIMComInterface, _CIMComInterface, &CLSID_CIMComInterface, &IID__CIMComInterface> CoCIMComInterface;

{F6240F08-CBDB-3E72-87E9-7A9FBD39B554}

IMComInterface.CIMComInterface

const GUID CLSID_CoClass_n_yh_interface = {0x022C078C, 0x48B9, 0x49CC,{ 0x8E, 0xB5, 0x3D,0xD0, 0x85, 0x2E,0xEF, 0xFB} };

comid,还可以直接查看dll文件记事本查看,里边搜索YinHai.XIAN,找到真实的ID

YinHai.XIAN.Actual.Interface.1.0

类TCIMComInterface 创建失败OLE error 80131040