如何过滤 <!--item text="aa"> </item--> ( 积分: 50 )

S

songzhi

Unregistered / Unconfirmed
GUEST, unregistred user!
用xml 生成TREEVIEW时, 如何过滤xml文件中的如下节点
<!--item text=&quot;aa&quot;> </item-->
 
就是读到这个节点时出错,如何才能忽略这个才点,不读也可.
 
代码如下,请帮一下
procedure XML2Tree(tree : TTreeView;
XMLDoc : TXMLDocument);
var
jNode : IXMLNode;
procedure ProcessNode(Node : IXMLNode;
tn : TTreeNode);
var
cNode : IXMLNode;
begin
if Node = nil then
Exit;
tn := tree.Items.AddChild(tn, Node.Attributes['text']);
tn.ImageIndex := Integer(Node.Attributes['imageIndex']);
tn.StateIndex := Integer(Node.Attributes['stateIndex']);

cNode := Node.ChildNodes.First;
while cNode <> nildo
begin
ProcessNode(cNode, tn);
cNode := cNode.NextSibling;
end;
end;
(*ProcessNode*)
begin
tree.Items.Clear;
XMLDoc.FileName := ChangeFileExt(ParamStr(0),'.XML');
XMLDoc.Active := True;
if XMLDoc.ChildNodes.First = nil then
begin
ShowMessage('nil');
Exit;
end;

jNode := XMLDoc.DocumentElement.ChildNodes.First;
while jNode <> nildo
begin
ProcessNode(jNode,nil);
jNode := jNode.NextSibling;
end;

XMLDoc.Active := False;
end;
 
加上条件限制即可
 
接受答案了.
 
顶部