Question

最初的VB.net，运行得很好：

Declare Function HolderName Lib "myCard.dll" (ByVal buf As String) As Integer
Declare Function Photo Lib "myCard.dll" (ByRef photo As Byte) As Integer

...

buff = Space(200) : res = HolderName(buff)
ShowMsg("HolderName():" & IIf(res = 0, "OK:" & Trim(buff), "FAIL"))

photobuf = New Byte(4096) {}
res = Photo(photobuf(0))
ShowMsg("Photo():" & IIf(res = 0, "OK", "FAIL"))
If res = 0 Then
    Dim ms As New MemoryStream(photobuf)
    picImage.Image = Image.FromStream(ms)
End If

转换后的代码现在使用C＃（使用http://converter.telerik.com/）

using System.Runtime.InteropServices;

...

[DllImport("myCard.dll", CharSet = CharSet.Ansi, SetLastError = true, ExactSpelling = true)]
public static extern int HolderName(String dBuff);

[DllImport("myCard.dll", CharSet = CharSet.Ansi, SetLastError = true, ExactSpelling = true)]
public static extern int Photo(ref byte photo);

//...

buff = new String(' ', 200);
res = HolderName(buff);
// buff remains UNALTERED!
ShowMsg("HolderName():" + (res == 0 ? "OK:" + Strings.Trim(buff) : "FAIL"));

photobuf = new byte[4096];
res = Photo(ref photobuf[0]);
ShowMsg("Photo():" + (res == 0 ? "OK" : "FAIL"));

// photobuf successfully receives the data bytes from Photo function
if (res == 0)
{
    MemoryStream ms = new MemoryStream(photobuf);
    picImage.Image = Image.FromStream(ms);
}

问题是buff保持不变，即使HolderName函数实际返回某些值（使用USB监视器观看）。为什么会发生这种情况？我该如何解决？

Answer 1

看起来这段代码在VB6中开始了。可能以该语言工作，但今天却很严重。两个[DllImport]声明都是错误的。

您让本机HolderName（）函数修改字符串的内容。这是非法的，.NET中的字符串是不可变的。您必须将参数声明为StringBuilder。并且在拨打电话之前将其容量设置得足够高。请注意，这是一个危险的功能，你不能告诉它避免写入超出分配的容量。

当它崩溃时会破坏GC堆，这是一个非常讨厌的问题。

Photo（）的问题是它的参数是实际 byte []，没有引用。倾向于偶然工作，这是一个非常常见的事故。但是，最大的问题是，pinvoke marshaller并不知道阵列需要固定。当Photo（）运行时垃圾收集器运行时，它会猛拉地板垫并将阵列移动到其他位置。照片（）不知道并继续使用旧地址。

当它崩溃时会破坏GC堆，这是一个非常讨厌的问题。

否则，没有什么理由可以在VB.NET中运行，而不是在C＃中运行。我怀疑框架更改是一个更好的解释。但一个必要的出发点肯定是消除错误，这类腐败问题很难理解。

Answer 2

最后，我回答了自己的问题。 StringBuilder就是答案！这是代码......

        [DllImport("mykaddll.dll", CharSet = CharSet.Ansi, SetLastError = true, ExactSpelling = true)]
        public static extern int HolderName([Out] StringBuilder dBuff);

        //....

        StringBuilder sbBuff = new StringBuilder(200);
        res = HolderName(sbBuff);
        buf = sbBuff.ToString().Trim();
        ShowMsg("HolderName():" + (res == 0 ? "OK:" + buf : "FAIL"));

从VB.NET转换为C＃ - 没有正确返回值

2 个答案: