有什么办法把DLL的变量值输出？(100)

我的dll文件：library Project2;uses ShareMem, SysUtils, Forms, Windows, Messages, Classes; Function read(b1:Longint;d1:Longint;a1char):Longint; stdcall ; begin if (b1=1)and (d1=3) and (a1='123456789')then begin Result:=0; a1:='987654321' end else Result:=1; end ;{$R *.res}end; exports read name 'Read';beginend.调用程序的函数：Function Read b1:Longint;d1:Longint;a1char):Longint;stdcall;external 'Project2.dll'; var ttchar;begin tt:='000000'; Label1.Caption:=inttostr(read(6,80,tt)); Label2.Caption:=tt; // 想这里的值变为：'987654321'end我想在调用这个dll把调用程序中的tt值变为：'987654321'，如何才能实现呢？

可真讨厌 弄个 内存块映射一下 不就完了 。。。。

不会呀大哥。

给钱 我给你做个 QQ1252504129