.net - 为什么对 AddDllDirectory 的调用失败并显示 "Parameter is incorrect"？

Question

为什么下面的代码不起作用？

open System
open System.Runtime.InteropServices
open System.ComponentModel

[<DllImport("kernel32")>]
extern int AddDllDirectory(string NewDirectory)

[<EntryPoint>]
let main argv = 
    let result = AddDllDirectory("c:\\")
    if result = 0 then
        printfn "%A" <| Win32Exception(Marshal.GetLastWin32Error())
        // Prints: "System.ComponentModel.Win32Exception (0x80004005): The parameter is incorrect"
    System.Console.ReadLine() |> ignore
    0 // return an integer exit code

Answer 1

AddDllDirectory() 是 winapi 的最新添加内容。它仅保证在 Windows 8 中可用，在早期 Windows 版本上获取它需要更新 KB2533623。选择产品要求时请记住这一点。

它的不寻常之处不止一种，它不遵循接受字符串的 winapi 函数的正常模式。这使得该函数有两个版本可用，即附加了 A 的 ANSI 版本和附加了 W 的 Unicode 版本。 AddDllDirectory() 没有附加字母，仅存在 Unicode 版本。我不清楚这是故意的还是疏忽，故意的可能性很高。 Windows 8 SDK header 中缺少函数声明，这确实很不寻常。

所以你原来的声明失败了，因为你调用了 Unicode 版本，但 pinvoke 编码器传递了 ANSI 字符串。您可能很幸运，因为该字符串包含奇数个字符，并且有足够的幸运零，不会导致 AccessViolation。

需要在 [DllImport] 声明中使用 CharSet 属性，以便 pinvoke 编码器传递 Unicode 字符串。