delphi 调用C写的动态库，传入指针型record，传出也一样，但是在返回参数解析时导致我的程序死机

[acridin]

delphi 调用C写的动态库，传入指针型record，传出也一样，但是在返回参数解析时导致我的程序死机


AIn= ^Ain;
Ain= record



Bout= ^Bout;
Bout= record

--动态库方法
type
Utrans = procedure(com : integer;Ain: pointer; Bout: pointer);stdcall;


我现在也初始化指针了，用GetMem，FillChar，最后释放FreeMem
但是还是不行，感觉C的动态库把我的传入指针拿走干别的去了，导致我的程序死，不知道我说的对不对，有人知道吗

[acridin]

引用 1 楼 DelphiGuy 的回复:

这要看C函数原型。

C的代码是别人公司的，不给看啊

[日立奔腾浪潮微软松下联想]

.h或者文档肯定是有的，要不你怎么知道这： --动态库方法 type Utrans = procedure(com : integer;Ain: pointer; Bout: pointer);stdcall;

[acridin]

引用 3 楼 DelphiGuy 的回复:

.h或者文档肯定是有的，要不你怎么知道这： --动态库方法 type Utrans = procedure(com : integer;Ain: pointer; Bout: pointer);stdcall;

有文档啊 就按文档写的

[日立奔腾浪潮微软松下联想]

这要看C函数原型。

[JohnYale]

in和out的record，在C中和Delphi中是怎么定义的？

[日立奔腾浪潮微软松下联想]

如果 type Utrans = procedure(com : integer;Ain: pointer; Bout: pointer);stdcall; 是文档中给出的调用方法，估计还是你的调用代码有什么问题。