Lazarus Reading XML- with TXMLDocument and TDOMNode

这里读取'HistoryPath' ,'TracePath' 元素下的‘value’属性使用的是

  1. var  
  2.   xmlCfg: TXMLDocument;   
  3.   
  4. ....   
  5.        
  6. function ReadXMLCFG: boolean;   
  7. var  
  8. .....   
  9.   HistoryPath: string = '';   
  10.   TracePath: string = '';   
  11.   vChild: TDOMNode;   
  12. .....   
  13. begin  
  14.   Result := False;   
  15.   if ... then  
  16.   begin  
  17.      .....   
  18.       ReadXMLFile(xmlCfg, vCMSConfigXml);   
  19.       vChild := xmlCfg.DocumentElement.FirstChild;   
  20.       while Assigned(vChild) do  
  21.       begin  
  22.         if vChild.HasAttributes then  
  23.         begin  
  24.           eName := vChild.NodeName;   
  25.           if eName = 'HistoryPath' then  
  26.           begin  
  27.             HistoryPath := vChild.Attributes.GetNamedItem('value').NodeValue;   
  28.           end;   
  29.           if eName = 'TracePath' then  
  30.           begin  
  31.             TracePath := vChild.Attributes.GetNamedItem('value').NodeValue;   
  32.           end;   
  33.         end;   
  34.         vChild := vChild.NextSibling;   
  35.       end;   
  36.    .....   
  37.     end;   
  38.   end;   
  39. end;  

posted @   海利鸟  阅读(645)  评论(0编辑  收藏  举报
编辑推荐:
· [.NET]调用本地 Deepseek 模型
· 一个费力不讨好的项目,让我损失了近一半的绩效!
· .NET Core 托管堆内存泄露/CPU异常的常见思路
· PostgreSQL 和 SQL Server 在统计信息维护中的关键差异
· C++代码改造为UTF-8编码问题的总结
阅读排行:
· 一个费力不讨好的项目,让我损失了近一半的绩效!
· 清华大学推出第四讲使用 DeepSeek + DeepResearch 让科研像聊天一样简单!
· 实操Deepseek接入个人知识库
· CSnakes vs Python.NET:高效嵌入与灵活互通的跨语言方案对比
· Plotly.NET 一个为 .NET 打造的强大开源交互式图表库
历史上的今天:
2012-02-19 TDateTime 的相关用法
点击右上角即可分享
微信分享提示