C#Struct to delphi打包记录

时间:2015-06-02 13:38:38

标签: c# delphi pinvoke

我有一个从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)."

1 个答案:

答案 0 :(得分:2)

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

[MarshalAs(UnmanagedType.LPArray)]

你必须使用

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