客户端用TSocketConnection和TClientDataSet连接,
V := VarArrayCreate([0, SizeOf(TDataRequestMsg)], VarByte);
MyBuffer := VarArrayLock(V);
...
VarArrayUnlock(V);
CustomerDataTmp.ClientDS.DataRequest(V);
这样请求数据,为什么只能在主进程中调用,放在一个线程中就会出这样的错误
First chance exception at $77E53887 . Exception class EVariantError with message 'Variant is not an array'. Process abc.exe ($DE4)
V := VarArrayCreate([0, SizeOf(TDataRequestMsg)], VarByte);
MyBuffer := VarArrayLock(V);
...
VarArrayUnlock(V);
CustomerDataTmp.ClientDS.DataRequest(V);
这样请求数据,为什么只能在主进程中调用,放在一个线程中就会出这样的错误
First chance exception at $77E53887 . Exception class EVariantError with message 'Variant is not an array'. Process abc.exe ($DE4)
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货