C# 结构体到delphi打包记录

Question

我有一个从delphi dll中提取的函数

function func_name(par1: Byte; par2: struct1) : boolean

结构 1 的组成为:

struct1 = packed record
    Number: Byte;
    arrStr : array[1..8] of struct2;
end

此外struct2由以下部分组成:

struct2 = packed record
    Code: Byte;
    Price: Single;
end

现在使用 C#，我尝试使用以下代码将相同的结构时间传递给 delphi

首先我创建了我的结构:

[StructLayout(LayoutKind.Sequential, Pack = 1, CharSet = CharSet.Ansi)]
public struct struct2
{
    public byte code;
    public Single price;
}

[StructLayout(LayoutKind.Sequential, Pack = 1, CharSet = CharSet.Ansi)]
public struct struct1
{
    public byte Number;

    [MarshalAs(UnmanagedType.LPArray)]
    public struct2[] Prices;

    public struct1(int elements)
    {
        Number = 0;
        arrStr = new struct2[elements];
    }
}

注意元素始终为8。

因此，当我尝试运行代码从而填充数组并将其传递给函数时，我收到以下错误:

无效的托管/非托管类型组合(数组字段必须与 ByValArray 或 SafeArray 配对)。"

Answer 1

数组内联在结构中。它不是一个指针。所以而不是

[MarshalAs(UnmanagedType.LPArray)]

你必须使用

[MarshalAs(UnmanagedType.ByValArray, SizeConst = 8)]