Delphi 中解析 XML 访问冲突

Question

伙计们，我真的需要帮助。我需要在 Delphi 7 中解析 XML 字符串，但我不断遇到访问冲突...请帮助！ 任何代码......

Answer 1

一些代码。

var
    doc: IXMLDocument;
    Root, Val: IXMLNode;
    I: Integer;
begin
    //doc := LoadXMLDocument('XMLFile.xml');
    doc := LoadXMLData('<?xml version="1.0" encoding="UTF-8"?>'+
                        '<Root>'+
                          '<Val>1</Val>'+
                          '<Val>2</Val>'+
                        '</Root>');

    Root := doc.ChildNodes.FindNode('Root');
    for I := 0 to Root.ChildNodes.Count - 1 do
    begin
        Val := Root.ChildNodes[I];
        ShowMessage(Val.NodeName+'='+ Val.NodeValue);
    end;
end;