我写的一个com组件里面需要解析xml,用的是TXMLDocument
代码如下
var
XMLDocument1: TXMLDocument;
Current: IXMLNode;
begin
TableCount:=0;
CoInitialize(nil);
XMLDocument1:=TXMLDocument.Create(nil);
XMLDocument1.XML.Text:=Xml ;
XMLDocument1.Active:=true;
Current:=nil;
Current:=XMLDocument1.DocumentElement.ChildNodes.First;----->vb调用这个com组件的时候,总是在这一句报错,
请各位告诉指教!!!
代码如下
var
XMLDocument1: TXMLDocument;
Current: IXMLNode;
begin
TableCount:=0;
CoInitialize(nil);
XMLDocument1:=TXMLDocument.Create(nil);
XMLDocument1.XML.Text:=Xml ;
XMLDocument1.Active:=true;
Current:=nil;
Current:=XMLDocument1.DocumentElement.ChildNodes.First;----->vb调用这个com组件的时候,总是在这一句报错,
请各位告诉指教!!!
在uses 里面加入Forms XMLDocument1:=TXMLDocument.Create(application);