百思不得其解
“
定义
var
GetTime: AnsiString;
dwCurrentNo: longint;
dwRetCode: longint;
strData: string[30];
longData: Longint;
Error_Message: string;
I: integer;
s: string;

程序段
StrData := '?';
DData := @strData[1];
DDat1 := DData;
strData[0] := #6;
DBytes := 6;
DByte1 := DBytes;
DAddr := 0 + 130;
DAdd1 := DAddr;
dwRetCode := ReadD();”


问：readd()执行后为什么会引起STRDATA的内容变化，READD（）是一个DLL当中的导出函数



[解决办法]
up