CodePudding user response:
The code posted a lookCodePudding user response:
Com + code to be obtained:Try
Try
//initial paraphrase, the initialization method and so on other places
CoInitialize (nil);
Acc:=GetWebServer (false, AIP, nil);
XML:=acc. GetTable (ASQL, ASn);
AOutXML:=XML;
Except,
On E: the Exception do
WritelogForTextName (' interface error: '+ e.M essage,' com interfaces);
end;
The finally
CoUninitialize;
end;
CodePudding user response:
There is an error to locate where a line?CodePudding user response:
Error message and specify lines of codeCodePudding user response:
The bank:XML:=acc. GetTable (ASQL, ASn);
CodePudding user response:
Through the log capture the information is as follows:Access violation at address 01 ec92fd. Write of address 01 ec92fd;
-- -- -- -- -- -- -- -- -- -- -- -- --
In my personal tasks, the com + component estimates do not support directly read webservice interface
CodePudding user response:
See the acc:=GetWebServer (false, AIP, nil); Return whether the object is empty,CodePudding user response:
Delphi contains interface program, the DLL are easy to memory, wrong SHAREMEM, can test,CodePudding user response:
I met, also don't know how to solve this problemCodePudding user response:
Try the CoInitializeEx