library WAPI;uses
SysUtils,
msxml,
msxmldom,
ComObj,
ActiveX,
Classes;...
function ZxtSendMessage(p_szUserLoginID):Integer;stdcall;
var
ObjXMLDoc: DOMDocument;
xmlText: widestring;
begin
xmlText := '';
xmlText := xmlText + '<?xml version="1.0" encoding="utf-8"?>';
....try
CoInitialize(nil);
//建立DOMDocument单元对象
ObjXMLDoc := CoDOMDocument.Create; //肯定是这行错误
CoUninitialize;
exceptend;
end;请高手赐教如何修改....
SysUtils,
msxml,
msxmldom,
ComObj,
ActiveX,
Classes;...
function ZxtSendMessage(p_szUserLoginID):Integer;stdcall;
var
ObjXMLDoc: DOMDocument;
xmlText: widestring;
begin
xmlText := '';
xmlText := xmlText + '<?xml version="1.0" encoding="utf-8"?>';
....try
CoInitialize(nil);
//建立DOMDocument单元对象
ObjXMLDoc := CoDOMDocument.Create; //肯定是这行错误
CoUninitialize;
exceptend;
end;请高手赐教如何修改....
ObjXMLDoc: DOMDocument;
begin
ObjXMLDoc :=CoDOMDocument.Create;
end;
单就这个来讲是不会出错的
报的是什么错误