C# 结构到 delphi 打包记录

C# Struct to delphi packed record

我有一个从 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];
    }
}

注意 elements 始终为 8。

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

Invalid managed/unmanaged type combination (Array fields must be paired with ByValArray or SafeArray)."

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

[MarshalAs(UnmanagedType.LPArray)]

你必须使用

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