L
libin202
Unregistered / Unconfirmed
GUEST, unregistred user!
midas线程中通过TSocketconnection.appserver调用服务端方法出现(EVariantInvalidArgError with message 'Invalid argument'(200)<br />onstructor TCommThread.Create(CreateSuspended: Boolean);
begin
fTermIndex := 0;
ReadDataList := TStringList.create();
fThreadExit := false;
fsc:=TSocketConnection.Create(nil);
fsc.Host:=gServerip;
fsc.Port := gServerPort;
fSc.ServerGUID := '{0EC6940A-528D-406D-B958-1D8C9F9F59A2}';
fsc.Connected:=True;
fSc.Open;
//调用服务器方法SendStr := IrdmTSMainDisp(IDispatch(fsc.AppServer)).TermEvents('10101',3,3,'');//服务端方法在主窗体中调用可以,线程中调就报EVariantInvalidArgError with message 'Invalid argument'
begin
fTermIndex := 0;
ReadDataList := TStringList.create();
fThreadExit := false;
fsc:=TSocketConnection.Create(nil);
fsc.Host:=gServerip;
fsc.Port := gServerPort;
fSc.ServerGUID := '{0EC6940A-528D-406D-B958-1D8C9F9F59A2}';
fsc.Connected:=True;
fSc.Open;
//调用服务器方法SendStr := IrdmTSMainDisp(IDispatch(fsc.AppServer)).TermEvents('10101',3,3,'');//服务端方法在主窗体中调用可以,线程中调就报EVariantInvalidArgError with message 'Invalid argument'