Question

在F＃中使用外部DLL（在本例中为SDL图形库）我导入了我需要的方法如下......

[<DllImport("SDL2.dll", CallingConvention = CallingConvention.Cdecl)>]
extern int SDL_QueryTexture(nativeint texture, uint32& format, int& access, int& w, int& h)

这很好用，我可以使用以下方法成功调用该方法......

let result = SDLDefs.SDL_QueryTexture(textTexture, &format, &access, &w, &h)

问题是本机SDL方法接受许多指针参数的空值。这在某些场景中是必需的（其功能类似于重载方法）。我找不到任何方法从F＃传递空值来调用这些方法。

例如，这失败，＆＃34;没有null作为正确的值＆＃34;

let result = SDLDefs.SDL_QueryTexture(textTexture, &format, null, &w, &h)

我读到了属性[AllowNullLiteral]，但似乎我只能将它应用于我定义的类型，而不是我导入的DLL中使用的预定义类型。

我有什么方法可以做到这一点吗？

Answer 1

如果要指定空值，则需要使用“原始指针”，它们由类型nativeint和nativeptr<T>表示。

[<DllImport("SDL2.dll", CallingConvention = CallingConvention.Cdecl)>]
extern int SDL_QueryTexture(nativeint texture, uint32& format, nativeint access, int& w, int& h)

// Call without null
let access = 42
let pAccess = NativePtr.stackalloc<int> 1
NativePtr.write pAccess access
SQL_QueryTexture( textTexture, &format, NativePtr.toNativeInt pAccess, &w, &h )
let returnedAccess = NativePtr.read pAccess

// Call with null
SQL_QueryTexture( textTexture, &format, null, &w, &h )

注意：请注意stackalloc。在堆栈上分配内存非常方便，因为您不需要显式释放它，但是一旦退出当前函数，指向它的指针将变为无效。因此，如果您确定该函数不会存储指针并稍后尝试使用它，那么您只能将这些指针传递给外部函数。

如果您需要将指针传递给不会去任何地方的实际堆内存，则需要Marshal.AllocHGlobal。但别忘了发布！（或者： - ）

let access = 42
let pAccess = Marshal.AllocHGlobal( sizeof<int> ) 
NativePtr.write (NativePtr.ofNativeInt pAccess) access
SQL_QueryTexture( textTexture, &format, pAccess, &w, &h )
Marshal.FreeHGlobal( pAccess )

F＃将Null传递给非托管导入的DLL

1 个答案: