将Delphi Dll导入我的Vb.net项目

-3 vb.net delphi interop

我试图将delphi dll导入我的vb.net项目

这是我的代码:

Private Declare Function AddIntegers Lib "C:\Program Files (x86)\Borland\Delphi6\Projects\first dll\Project2.dll" Alias "AddIntegers" (ByVal a As Integer, ByVal b As Integer) As Integer

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ii As Integer = AddIntegers(1, 3)
        MsgBox(ii)
    End Sub
Run Code Online (Sandbox Code Playgroud)

这是delphi库代码:

library MyFirstLibrary;

uses
  SysUtils,
  Classes;

{$R *.res}

function AddIntegers(_a, _b: integer): integer; stdcall;
begin
  Result := _a + _b;
end;

exports
   AddIntegers;
begin
end.
Run Code Online (Sandbox Code Playgroud)

有一个EntryPointNotFoundException:

Unable to find an entry point named 'AddIntegers' in DLL 'C:\Program Files (x86)\Borland\Delphi6\Projects\first dll\Project2.dll'.":""
Run Code Online (Sandbox Code Playgroud)

我如何修复EntryPointNotFoundException(函数AddIntegers存在于我的delphi代码中)?(vb.net或c#)

TLa*_*ama 5

我的猜测是你正在加载一个不同的库.您正在加载Project2.dll,而您的Delphi库是MyFirstLibrary.dll在您在问题中发布的代码中调用的.

  • 我不想写一个答案.答案就是你的第一段.这就是所需要的.而且我因此而受到了赞扬.代码只是淡化了消息. (2认同)