如何根据平台加载Dll

Question

我有一个 32 位和 64 位的 dll，现在我希望我的 exe 根据解决方案平台调用该 dll，这意味着当设置 x64 时，将调用 64 位的 dll。为此，我声明了一个函数 GetPlatform()。

Public Function GetPlateform() As String

    Dim var1 As String
    If (IntPtr.Size = 8) Then
        var1 = hellox64
    Else
        var1 = hello
    End If
    Return var1
End Function

当表单加载时 这个var1被分配给var，最后。

Public Declare Function function1 Lib "var" (ByVal Id As Integer) As Integer

但是当我调试代码时，出现“DllNotFoundException”。 注意：dll 是用 vc++ 编写的。

Answer 1

将本机 dll 存储到子文件夹中，并通过相应填写 库加载器 来提示 < code>PATH 进程环境变量，包含要加载的正确版本的路径。

例如，给定这个树布局......

Your_ assembly.dll
  |_NativeBinaries
      |_x86
          |_your_native.dll
      |_amd64
          |_your_native.dll

...并且此代码（抱歉，C#，没有 VB.Net :-/ ）...

internal static class NativeMethods
{
    private const string nativeName = "your_native";

    static NativeMethods()
    {
        string originalAssemblypath = new Uri(Assembly.GetExecutingAssembly().CodeBase).LocalPath;

        string currentArchSubPath = "NativeBinaries/x86";

        // Is this a 64 bits process?
        if (IntPtr.Size == 8)
        {
            currentArchSubPath = "NativeBinaries/amd64";
        }

        string path = Path.Combine(Path.GetDirectoryName(originalAssemblypath), currentArchSubPath);

        const string pathEnvVariable = "PATH";
        Environment.SetEnvironmentVariable(pathEnvVariable,
            String.Format("{0}{1}{2}", path, Path.PathSeparator, Environment.GetEnvironmentVariable(pathEnvVariable)));
    }

    [DllImport(nativeName)]
    public static extern int function1(int param);

    [DllImport(nativeName)]
    public static extern int function2(int param);
}

...function1 和 function2 将动态绑定到 32或本机代码的 64 位版本，具体取决于 IntPtr 的大小（Scott Hanselman 或这个 StackOverflow问题 ）。

注 1： 当 dll 的两个版本具有相同的名称或者您不愿意复制每个外部引用时，此解决方案特别有用。

注2：这已经在LibGit2Sharp。

Answer 2

不可以，您不能在 lib 语句中动态创建对 DLL 的引用。但是，您可能（免责声明：尚未尝试过）能够创建两个引用并在代码中调用适当的引用。

Public Declare Function Function132 Lib "My32BitLib.DLL" Alias "function1" (ByVal Id As Integer) As Integer

Public Declare Function Function164 Lib "My64BitLib.DLL" Alias "function1" (ByVal Id As Integer) As Integer

然后，您需要在平台上进行分支并根据平台调用适当的别名函数名称（Function132 或 Function164）。