难道每次添加节点,都要把原来的文件所以的节点值都读出来,然后在依次写进去吗?
解决方案 »
- 线程的问题
- 救命,用SPCOMM编写程序出现的奇怪问题……
- 关于时间格式转化为字符串的问题,急!!!!
- 各位cs侠,请看我的另类问题系列(一)--About table TQuery and dbgrid
- 系统进不了了,大家快来安慰我!!!~~~
- 一对多报表如何实现?急!!!谢谢!
- 请问如何让程序在制定的点,停止一秒在执行.
- 给点地址下点:Tab控件 !!!在线等待
- 问几个关于Object Pascal的问题(大概可以归为语法问题)
- 怎样使用install shield发布ACTIVEX控件
- CORBA高高手请进:如何实现Java与Delphi的CORBA互联?
- 困惑好久了,字符的问题!谁能解决?
with DM.WriteXML do
begin
Active := true;
Root := addchild('Ftp_List');
Encoding := 'GB2312'; //设置字符集
Parent_Node := Root.AddChild('Ftp_JOB');
Child_Node := Parent_Node.AddChild('IP');
Child_Node.Text := edtIP.Text;
Child_Node := Parent_Node.AddChild('SDir');
Child_Node.Text := edtSDir.Text;
Child_Node := Parent_Node.AddChild('UID');
Child_Node.Text := edtUID.Text;
Child_Node := Parent_Node.AddChild('PWD');
Child_Node.Text := edtPWD.Text;
Child_Node := Parent_Node.AddChild('LDir');
Child_Node.Text := edtLDir.Text;
Child_Node := Parent_Node.AddChild('FCount');
Child_Node.Text := edtFCount.Text;
SaveToFile(sDDir + '\FtpList.dat'); //把组织好的XML文档存于Output.xml文件中
Active := false;
end;