DLL和EXE之间怎样传递记录数组

[dulei115]

type
Taa = record
...各项数据类型不确定，可以是基本类型，也可能是类
end;
Tbb = array of Taa;

我试过下面的都不行，DLL中的定义如下：
1.procedure test(var vbb: Tbb);
2.function test: Tbb;
把Tbb改定义为 array[0..9] of Taa （即静态数组）也不行
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
有谁知道怎么实现？？？？？

[chinasdp]

**?

在DLL和EXE中都有该记录的声明就可以了。

[dulei115]

都有该记录的声明

[linzhengqun]

我是这样认为的：Array of动态数据是生命期自动管理的，和String很类似，而DLL的导出函数有String类型的必须变成PChar，或加入ShareMem这个单元。你可以从这个方面去考虑，也许它的内存管理和String也是一样的，所以从DLL导出的时候可能就会有问题。

另外，我建议动态数组换成TList，从DLL传出来时就一个指针，处理起来更方便。

[linzhengqun]

另外，看一下帮助ShareMem，对你一定有很多启发的。

[Maple119]

如果使用string数据类型,有时候会报错.其它数据类型则未见有错误.
至于sharemem单元,我有使用,但未解决.应该是我的功力底的原因.

[dulei115]

谢谢楼上多回答！
是我自己弄错了一个地方
在Library中Form并不包含在Application.Components
---------------------------------------------------------
有谁知道怎样遍历DLL中的Form，类似Project中的下面的代码
for i := 0 to Application.ComponentCount - 1 do
if Application.Components[i] is TForm then
//use (Application.Components[i] as TForm)

[dulei115]

Sorry!!!!!!!!!!!Very Soory!!!!!

[linzhengqun]

去Application传进DLL中不知可以否，没有试过不错。
但遍历DLL中的Form并不难吧，你可以自己维护一张连表啊。

[cncharles]

这样改, 晕你还是星星来着
type
Taa = record
.............
end;
Tbb =^Taa
接口声明
procedure test(var vbb: Tbb);
function test: Tbb;
var
aa:Taa;

implementation

procedure test(var vbb: Tbb);
begin
vbb:=@aa;
end;

function test: Tbb;
begin
Result:=@aa;
end;




***********************************
高级群号:16497064欢迎编程高手加入.
***********************************

[dulei115]

我想用代码自动实现，不想自己去维护，不知道有没有？？？？

[dulei115]

烦，还是没人知道 遍历DLL中的Form 的答案，没时间等了，改用手动维护动态数组了，结贴