C#结构到delphi打包记录
我有一个从delphi dll中提取的函数C#结构到delphi打包记录,c#,delphi,pinvoke,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 此外,结构2由以下部分组成: struct2 = packed record Code: Byte; Price: Single; e
function func_name(par1: Byte; par2: struct1) : boolean
结构1由以下部分组成:
struct1 = packed record
Number: Byte;
arrStr : array[1..8] of struct2;
end
此外,结构2由以下部分组成:
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配对)。“
数组在结构中是内联的。它不是指针。因此
[MarshalAs(UnmanagedType.LPArray)]
你必须使用
[MarshalAs(UnmanagedType.ByValArray, SizeConst = 8)]
@杰瑞,没有not@David这就是为什么当我看到你的答案时(在我发布后的几秒钟内),我立即删除了我的评论。我只记得许多类似的情况是通过不使用“打包”来修复的“记录和使用普通记录。@杰瑞重要的是双方都匹配。干得好!它工作得很好!我尝试了byValArray,但没有定义大小!再次感谢!FWIW文档说:当MarshalAsAttribute.Value属性设置为ByValArray时,必须设置SizeConst字段以指示数组中的元素数。当需要区分字符串类型时,ArraySubType字段可以选择性地包含数组元素的非托管类型。只能在其元素在结构中显示为字段的数组上使用此非托管类型。你可以忽略最后一句中的语法混乱!!非常感谢@david