c#结构到delphi打包记录

本文关键字:记录 包记录 结构 delphi | 更新日期: 2023-09-27 17:52:33

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

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

Struct 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)."

c#结构到delphi打包记录

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

[MarshalAs(UnmanagedType.LPArray)]

必须使用

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