文件格式为：

Day	制1課	U12	ASSY01	Wrist	1009	0	2018/05/18 09:35:59

Day	制1課	U12	ASSY02	Wrist	1010	0	2018/05/18 09:36:01

Day	制1課	U12	ASSY03	Wrist	1011	0	2018/05/18 09:36:03

Day	制1課	U12	ASSY04	Wrist	1012	0	2018/05/18 09:36:05

Day	制1課	U12	ASSY05	Wrist	1013	0	2018/05/18 09:36:07

Day	制1課	U12	ASSY06	Wrist	1014	0	2018/05/18 09:36:10

Day	制1課	U12	ASSY07	Wrist	1015	0	2018/05/18 09:36:12

Day	制1課	U12	ASSY08	Wrist	1016	0	2018/05/18 09:36:14

Day	制1課	U12	ASSY09	Wrist	1017	0	2018/05/18 09:36:16

2.把此文件转成XML(用Delphi7):

procedure TForm1.Button1Click(Sender: TObject);

var

  lst,lstfield :TStringList;

  xml:TXMLDocument;

  node :IXMLNode;

  i,j:integer;

begin

  xml := TXMLDocument.Create(nil);

  try

    xml.Active := True;

    xml.Version := '1.0';

    xml.Encoding := 'UTF-8';

    xml.DocumentElement := xml.CreateElement('ESDDATA','ESD');

    xml.Options:=[doNodeAutoIndent];

    xml.NodeIndentStr :=#;

    lstfield := TStringList.Create;

    try

      lst := TStringList.Create;

      try

        lst.LoadFromFile('ESDStatus.txt');

        Memo1.Text := lst.Text;

        for i:= to lst.Count- do

        begin

          lstfield.Clear;

          ExtractStrings([Char(VK_TAB)],[' '], PChar(lst[i]), lstfield) ;

          if lstfield.Count> then

          begin

             node := xml.DocumentElement.AddChild('item');

             {node.AddChild('SHIFT_NAME').Text :=lstfield[0];   --加子元素

             node.AddChild('PRODUCT_ROOM').Text :=lstfield[1];

             node.AddChild('PDLINE_NAME').Text :=lstfield[2];

             node.AddChild('POSITION').Text :=lstfield[3];

             node.AddChild('CATEGORY').Text :=lstfield[4];

             node.AddChild('NO').Text :=lstfield[5];

             node.AddChild('STATUS').Text :=lstfield[6];

             node.AddChild('PROCESSTIME').Text :=lstfield[7];}

             node.Attributes['SHIFT_NAME']:= lstfield[];  //增加元素属性

             node.Attributes['PRODUCT_ROOM']:= lstfield[];

             node.Attributes['PDLINE_NAME']:= lstfield[];

             node.Attributes['POSITION']:= lstfield[];

             node.Attributes['CATEGORY']:= lstfield[];

             node.Attributes['NO']:= lstfield[];

             node.Attributes['STATUS']:= lstfield[];

             node.Attributes['PROCESSTIME']:= lstfield[];

          end;

        end;

      finally

        lst.Free;

      end;

    finally

      lstfield.Free;

    end;

    Memo2.Lines.Text:= xml.XML.Text;

  finally

    node:=nil;

    xml.Active := false;

    xml.Free;

  end;

end;

3 生成子元素的内容为：

<?xml version="1.0" encoding="UTF-8"?>

<ESDDATA xmlns="ESD">

    <item>

        <SHIFT_NAME>Day</SHIFT_NAME>

        <PRODUCT_ROOM>鍒?瑾?/PRODUCT_ROOM>

        <PDLINE_NAME>U12</PDLINE_NAME>

        <POSITION>ASSY01</POSITION>

        <CATEGORY>Wrist</CATEGORY>

        <NO>1009</NO>

        <STATUS>0</STATUS>

        <PROCESSTIME>2018/05/18 09:35:59</PROCESSTIME>

    </item>

    <item>

        <SHIFT_NAME>Day</SHIFT_NAME>

        <PRODUCT_ROOM>鍒?瑾?/PRODUCT_ROOM>

        <PDLINE_NAME>U12</PDLINE_NAME>

        <POSITION>ASSY02</POSITION>

        <CATEGORY>Wrist</CATEGORY>

        <NO>1010</NO>

        <STATUS>0</STATUS>

        <PROCESSTIME>2018/05/18 09:36:01</PROCESSTIME>

    </item>

    <item>

        <SHIFT_NAME>Day</SHIFT_NAME>

        <PRODUCT_ROOM>鍒?瑾?/PRODUCT_ROOM>

        <PDLINE_NAME>U12</PDLINE_NAME>

        <POSITION>ASSY03</POSITION>

        <CATEGORY>Wrist</CATEGORY>

        <NO>1011</NO>

        <STATUS>0</STATUS>

        <PROCESSTIME>2018/05/18 09:36:03</PROCESSTIME>

    </item>

    <item>

        <SHIFT_NAME>Day</SHIFT_NAME>

        <PRODUCT_ROOM>鍒?瑾?/PRODUCT_ROOM>

        <PDLINE_NAME>U12</PDLINE_NAME>

        <POSITION>ASSY04</POSITION>

        <CATEGORY>Wrist</CATEGORY>

        <NO>1012</NO>

        <STATUS>0</STATUS>

        <PROCESSTIME>2018/05/18 09:36:05</PROCESSTIME>

    </item>

    <item>

        <SHIFT_NAME>Day</SHIFT_NAME>

        <PRODUCT_ROOM>鍒?瑾?/PRODUCT_ROOM>

        <PDLINE_NAME>U12</PDLINE_NAME>

        <POSITION>ASSY05</POSITION>

        <CATEGORY>Wrist</CATEGORY>

        <NO>1013</NO>

        <STATUS>0</STATUS>

        <PROCESSTIME>2018/05/18 09:36:07</PROCESSTIME>

    </item>

    <item>

        <SHIFT_NAME>Day</SHIFT_NAME>

        <PRODUCT_ROOM>鍒?瑾?/PRODUCT_ROOM>

        <PDLINE_NAME>U12</PDLINE_NAME>

        <POSITION>ASSY06</POSITION>

        <CATEGORY>Wrist</CATEGORY>

        <NO>1014</NO>

        <STATUS>0</STATUS>

        <PROCESSTIME>2018/05/18 09:36:10</PROCESSTIME>

    </item>

    <item>

        <SHIFT_NAME>Day</SHIFT_NAME>

        <PRODUCT_ROOM>鍒?瑾?/PRODUCT_ROOM>

        <PDLINE_NAME>U12</PDLINE_NAME>

        <POSITION>ASSY07</POSITION>

        <CATEGORY>Wrist</CATEGORY>

        <NO>1015</NO>

        <STATUS>0</STATUS>

        <PROCESSTIME>2018/05/18 09:36:12</PROCESSTIME>

    </item>

    <item>

        <SHIFT_NAME>Day</SHIFT_NAME>

        <PRODUCT_ROOM>鍒?瑾?/PRODUCT_ROOM>

        <PDLINE_NAME>U12</PDLINE_NAME>

        <POSITION>ASSY08</POSITION>

        <CATEGORY>Wrist</CATEGORY>

        <NO>1016</NO>

        <STATUS>0</STATUS>

        <PROCESSTIME>2018/05/18 09:36:14</PROCESSTIME>

    </item>

    <item>

        <SHIFT_NAME>Day</SHIFT_NAME>

        <PRODUCT_ROOM>鍒?瑾?/PRODUCT_ROOM>

        <PDLINE_NAME>U12</PDLINE_NAME>

        <POSITION>ASSY09</POSITION>

        <CATEGORY>Wrist</CATEGORY>

        <NO>1017</NO>

        <STATUS>0</STATUS>

        <PROCESSTIME>2018/05/18 09:36:16</PROCESSTIME>

    </item>

</ESDDATA>

4 生成元素属性内容为：

<?xml version="1.0" encoding="UTF-8"?>

<ESDDATA xmlns="ESD">

    <item SHIFT_NAME="Day" PRODUCT_ROOM="鍒?瑾? PDLINE_NAME="U12" POSITION="ASSY01" CATEGORY="Wrist" NO="1009" STATUS="0" PROCESSTIME="2018/05/18 09:35:59"/>

    <item SHIFT_NAME="Day" PRODUCT_ROOM="鍒?瑾? PDLINE_NAME="U12" POSITION="ASSY02" CATEGORY="Wrist" NO="1010" STATUS="0" PROCESSTIME="2018/05/18 09:36:01"/>

    <item SHIFT_NAME="Day" PRODUCT_ROOM="鍒?瑾? PDLINE_NAME="U12" POSITION="ASSY03" CATEGORY="Wrist" NO="1011" STATUS="0" PROCESSTIME="2018/05/18 09:36:03"/>

    <item SHIFT_NAME="Day" PRODUCT_ROOM="鍒?瑾? PDLINE_NAME="U12" POSITION="ASSY04" CATEGORY="Wrist" NO="1012" STATUS="0" PROCESSTIME="2018/05/18 09:36:05"/>

    <item SHIFT_NAME="Day" PRODUCT_ROOM="鍒?瑾? PDLINE_NAME="U12" POSITION="ASSY05" CATEGORY="Wrist" NO="1013" STATUS="0" PROCESSTIME="2018/05/18 09:36:07"/>

    <item SHIFT_NAME="Day" PRODUCT_ROOM="鍒?瑾? PDLINE_NAME="U12" POSITION="ASSY06" CATEGORY="Wrist" NO="1014" STATUS="0" PROCESSTIME="2018/05/18 09:36:10"/>

    <item SHIFT_NAME="Day" PRODUCT_ROOM="鍒?瑾? PDLINE_NAME="U12" POSITION="ASSY07" CATEGORY="Wrist" NO="1015" STATUS="0" PROCESSTIME="2018/05/18 09:36:12"/>

    <item SHIFT_NAME="Day" PRODUCT_ROOM="鍒?瑾? PDLINE_NAME="U12" POSITION="ASSY08" CATEGORY="Wrist" NO="1016" STATUS="0" PROCESSTIME="2018/05/18 09:36:14"/>

    <item SHIFT_NAME="Day" PRODUCT_ROOM="鍒?瑾? PDLINE_NAME="U12" POSITION="ASSY09" CATEGORY="Wrist" NO="1017" STATUS="0" PROCESSTIME="2018/05/18 09:36:16"/>

</ESDDATA>

5:可以把以上的内容做为参数传给数据库进行处理，保证事物的原子性(具休调用待后续提供).

Delphi 7生成XML的更多相关文章

  1. Delphi中解析Xml的控件-SimDesign NativeXml

    Delphi中解析Xml的控件-SimDesign NativeXml 正在学习,感觉应用很方便.无源代码的版本还是免费的. SimDesign.NativeXml是一个delphi和bcb的XML控 ...

  2. Android 解析XML文件和生成XML文件

    解析XML文件 public static void initXML(Context context) { //can't create in /data/media/0 because permis ...

  3. 让Visual Studio 2013为你自动生成XML反序列化的类

    Visual Sutdio 2013增加了许多新功能,其中很多都直接提高了对代码编辑的便利性.如: 1. 在代码编辑界面的右侧滚动条上显示不同颜色的标签,让开发人员可以对所编辑文档的修改.查找.定位情 ...

  4. Rss 订阅：php动态生成xml格式的rss文件

    Rss 简介: 简易信息聚合(也 叫聚合内容)是一种描述和同步网站内容的格式.使用RSS订阅能更快地获取信息,网站提供RSS输出,有利于让用户获取网站内容的最新更新.网络用户可以在客户端借助于支持RS ...

  5. java 解析并生成 XML

    在 java 中使用 Dom4j 解析 XML 对 XML 文件的解析,通常使用的是 Dom4j 和 jdom 作为XML解析工具. 在此只介绍下 Dom4j 对 XML 文件的解析使用方法. 1. ...

  6. Java生成XML文件

    我们在数据库中的数据可以将其提取出来生成XML文件,方便传输.例如数据库中有Admin这张表: 我们写一个java类表示admin数据: package xmlDom.vo; import java. ...

  7. Android 使用xml序列化器生成xml文件

    在<Android 生成xml文件>一文中使用流的形式写入xml格式文件,但是存在一定的问题,那就是在短信内容中不能出现<>之类的括号,本文使用xml序列化器来解决 xml序列 ...

  8. Android 生成xml文件

    生成XML文件备份短信,其格式为: <?xml version="1.0" encoding="UTF-8" standalone="true& ...

  9. VS2010 生成Xml格式的注释文档

    项目, 属性, build, 勾选xml document file, 重新build, 即可生成xml注释文件, 然后还得找工具软件(看到anytao推荐SandCastle) 生成更易读的帮助文档 ...

随机推荐

  1. 继承spring的validator接口，实现对数据的校验

    在org.springframework.validation这个包中提供了一些对数据校验的方法,其中Validator接口是其中的一个. 现在用Validator接口,完成对数据的校验. 第一步:先 ...

  2. python 一些乱七八糟的东西

    import random import os import sys import re class _is: def __init__(self,reg): self.cr=re.compile(r ...

  3. GTK+与MFC不完全对比

    转载自:http://tech.ddvip.com/2007-11/119640973738229.html 1. 两者都是基于面向对象设计的.尽管MFC是用C++写的,而GTK+是用C写的,但思想都 ...

  4. jQuery知识点：attr与prop的区别

    做项目时遇到个莫名的问题,全选的时候仅第一次有效,再次点击全选按钮是无效了,查了查原因,看到篇很不错的文章,问题出在jquery中的attr属性上,这里做下笔记. 原文链接:http://www.cn ...

  5. bzoj 1576: [Usaco2009 Jan]安全路经Travel——并查集+dijkstra

    Description Input * 第一行: 两个空格分开的数, N和M * 第2..M+1行: 三个空格分开的数a_i, b_i,和t_i Output * 第1..N-1行: 第i行包含一个数 ...

  6. bzoj 1208 HNOI2004宠物收养所 平衡树

    裸平衡树,恢复手感用的 //By BLADEVIL var n :longint; i :longint; x, y :longint; t, tot :longint; key, s, left, ...

  7. 关于hrtimer_forward小段代码的分析【转】

    转自:http://blog.csdn.net/wowuyinglingluan/article/details/45720151 版权声明:本文为博主原创文章,未经博主允许不得转载.   目录(?) ...

  8. Maven介绍---POM、Dependency Management、Coordinates

    Maven是基于项目对象模型(POM),可以通过一小段描述信息来管理项目的构建.报告和文档的软件项目管理工具. POM(Project Object Model,对象模型): 仅仅只是一个xml配置文 ...

  9. [ 总结 ] RHEL6/Centos6 使用OpenLDAP集中管理用户帐号

    使用轻量级目录访问协议(LDAP)构建集中的身份验证系统可以减少管理成本,增强安全性,避免数据复制的问题,并提供数据的一致性.

  10. window10下部署flask系统（apache和wsgi）

    公司有一个小系统,通过url和其他系统进行数据交互(有点土). 因此,利用flask写了一个小程序. 现在,考虑到并发问题(flask自身是不会并发的),准备部署在apache+wsgi环境. 网上百 ...