设想
在 P/Invoking 时，我认为通过设计一个调用该函数的通用函数来简化/减少大量代码可能是一个好主意，然后它会检查GetLastWin32Error
我正在使用这段代码：
''' <summary>
''' Invokes the specified encapsulated function, trying to provide a higher safety level for error-handling.
''' If the function that was called using platform invoke has the <see cref="DllImportAttribute.SetLastError"/>,
''' then it checks the exit code returned by the function, and, if is not a success code, throws a <see cref="Win32Exception"/>.
''' </summary>
''' ----------------------------------------------------------------------------------------------------
''' <typeparam name="T"></typeparam>
'''
''' <param name="expr">
''' The encapsulated function.
''' </param>
''' ----------------------------------------------------------------------------------------------------
''' <returns>
''' The type of the return value depends on the function definition.
''' </returns>
''' ----------------------------------------------------------------------------------------------------
''' <exception cref="Win32Exception">
''' Function 'X' thrown an unmanaged Win32 exception with error code 'X'.
''' </exception>
''' ----------------------------------------------------------------------------------------------------
<DebuggerStepThrough>
Private Shared Function SafePInvoke(Of T)(ByVal expr As Expression(Of Func(Of T))) As T
Dim result As T = expr.Compile.Invoke()
Dim method As MethodInfo =
CType(expr.Body, MethodCallExpression).Method
Dim isSetLastError As Boolean =
method.GetCustomAttributes(inherit:=False).
OfType(Of DllImportAttribute)().FirstOrDefault.SetLastError
If isSetLastError Then
Dim exitCode As Integer = Marshal.GetLastWin32Error
If exitCode <> 0 Then
Throw New Win32Exception([error]:=exitCode,
message:=String.Format("Function '{0}' thrown an unmanaged Win32 exception with error code '{1}'.",
method.Name, CStr(exitCode)))
End If
End If
Return result
End Function
我认为提高效率的事情应该是 API 函数应该能够设置最后一个错误，并且，当函数能够做到这一点时，我应该将SetLastError属性设置为True，当然SetLastError=True如果 a 将被忽略该函数自然不会设置最后一个错误，所以无论如何，无论我将传递给这个通用SafePinvoke函数什么样的函数，它都不会给出“误报”，或者至少我认为不会。
那么，一个使用示例应该是这样的：
首先，我们寻找一个管理最后一个错误的 API 函数，例如FindWindow
其次，我们在代码中添加定义，
SetLastError在签名中设置属性。<DllImport("user32.dll", SetLastError:=True)> Private Shared Function FindWindow( ByVal lpClassName As String, ByVal zero As IntPtr ) As IntPtr End Function最后，我们使用它。
Dim lpszParentClass As String = "Notepad" Dim parenthWnd As IntPtr = SafePInvoke(Function() FindWindow(lpszParentClass, IntPtr.Zero)) If parenthWnd = IntPtr.Zero Then MessageBox.Show(String.Format("Window found with HWND: {0}", CStr(parenthWnd))) Else MessageBox.Show("Window not found.") End If
此时我们可以看到一切似乎都按预期工作，如果找到窗口，它将返回一个非零Intptr，如果没有找到窗口，它将返回一个Intptr.Zero，并且，如果函数因为空而失败字符串，它会抛出一个Win32Exception错误代码123，它指的是：
ERROR_INVALID_NAME
123 (0x7B) The filename, directory name, or volume label syntax is incorrect.
一切似乎都很好。
问题
我需要这样说来论证我的问题的原因，我不会造成任何负面影响，但发生的事情是一些非常有经验的程序员说我的函数不安全，因为我对 GetLastWin32Error 的很多事情都错了，在这个线程：
我的目的是从我的错误中吸取教训，但为此，首先我应该遇到错误的证据，而我没有找到它。
我想改进或在需要的情况下完全删除并重新考虑SafePinvoke上面通用函数的方法，如果它在“X”情况下真的不能按预期工作，只是我想看看并了解可能是什么情况，通过提供可以测试以证明错误/冲突的真实代码示例，那么，我的问题是：
有人可以用一个 API 函数的真实代码示例来说明，当通过SafePinvoke上面的函数时，它可能会给出“误报”错误或其他类型的冲突？
有人可以指导我并解释我的SafePinvoke功能是否真的安全，或者不安全，或者是否可以改进，以及，提供可以测试的代码示例？
我将非常感谢所有可以帮助我改进这种方法的信息，或者了解该方法在某些情况下确实行不通，但是请给出一个代码示例来演示它。