有一个.xml文件内容如下:
<?xml version="1.0" encoding="utf-8"?>
<DefaultSettings Version="1.0.0.8" FirstTime="false">
<Setting Name="AgentServer" value="localhost"/>
<Setting Name="AgentAddress" value="192.168.1.66"/>
<Setting Name="AgentPort" value="862182"/>怎么样把IP 192.168.1.66 地址提取出来保存呢
<?xml version="1.0" encoding="utf-8"?>
<DefaultSettings Version="1.0.0.8" FirstTime="false">
<Setting Name="AgentServer" value="localhost"/>
<Setting Name="AgentAddress" value="192.168.1.66"/>
<Setting Name="AgentPort" value="862182"/>怎么样把IP 192.168.1.66 地址提取出来保存呢
解决方案 »
- 高分★★★求做可视组件的问题
- 500分!!急——怎么样把全屏的游戏窗体设置成为自己程序的父窗体
- 显示今日的数据,该怎么写
- 你的柔情我永远不懂!!!
- 请高手解决一个问题
- ===求助:Delphi6、Bde、win98的问题?===
- 我使用Query控件出现了如下问题:'Error creating cursor handle'
- 用单机可否开发S/c程序?
- 难道真的没人知道吗???难道真的没人知道吗???难道真的没人知道吗???难道真的没人知道吗???难道真的没人知道吗???
- 谁能比较详细的介绍一下Hook的概念和使用方法?(分数不够可再加)
- 尺码横向排列问题?
- 求实现每隔5秒运行此程序,捕获是否有(a.exe 暂用此名称代替)的窗口弹出,聚焦此窗口,发回车命令!
给你个代码,递归所有的子项,你自己看看procedure TForm1.viewNode(uNode: IXMLNode);
var i: Integer;
begin
for i := 0 to uNode.ChildNodes.Count - 1 do
begin
if uNode.ChildNodes.Nodes[i].HasChildNodes then
begin
showmessage(uNode.ChildNodes.Nodes[i].NodeName + '!!');
viewNode(uNode.ChildNodes.Nodes[i]);
end
else
showmessage(uNode.ChildNodes.Nodes[i].XML + '/' + uNode.ChildNodes.Nodes[i].NodeValue);
end;
end;调用:
if XMLDocument1.ChildNodes.Nodes[i].HasChildNodes then
viewNode(XMLDocument1.ChildNodes.Nodes[i])