Eine in Delphi erstellte DLL in Visual Basic einbinden

[Sprint]

Integer ist unter Delphi ein Longint (32-Bit). Also musst du in Visual Basic auch Long benutzen und nicht Integer (16-Bit).

Delphi-Quellcode:

library Mathe;

function Addiere(ValueA, ValueB: Integer): Integer; stdcall;
begin
  Result := ValueA + ValueB;
end;

exports
  Addiere;

begin
end.

Code:

Option Explicit

Private Declare Function Addiere Lib "Mathe.dll" (ByVal ValueA As Long, ByVal ValueB As Long) As Long

Private Sub Command1_Click()
    MsgBox CStr(Addiere(10, 10))
End Sub