從數據庫導出xml文件的問題(50分)

從數據庫導出xml文件的問題
這是我要導出xml的例子 有一個表頭,下面的數據有多條
有原碼最好了.希望大家多提提建議,謝謝.

<?xml version=&quot;1.0&quot; ?>
- <Root>
- <Engine_Header>
<Bulk_Master_ID>C7U0002F</Bulk_Master_ID>
<Factory_Code>7</Factory_Code>
<Factory_Name>Foxconn Longhua</Factory_Name>
<BulkSize>2235</BulkSize>
<Date_Time>04/07/06 04:38:01</Date_Time>
<Module_Code>0202879</Module_Code>
<Product_Code>0534943</Product_Code>
</Engine_Header>
- <Engine_Data>
<PSN>7U0C0051S</PSN>
<Module_Code>0202879</Module_Code>
<HWID>6000</HWID>
<SWID>RH79BR004</SWID>
<Station_ID>7URFT-01</Station_ID>
<Date_Time>02/19/06 23:41:45</Date_Time>
<Line_ID>7U</Line_ID>
<Bulk_Status>1</Bulk_Status>
<Product_Code>0534943</Product_Code>
</Engine_Data>
- <Engine_Data>
<PSN>7U0C00E76</PSN>
<Module_Code>0202879</Module_Code>
<HWID>6000</HWID>
<SWID>RH79BR004</SWID>
<Station_ID>7URFT-01</Station_ID>
<Date_Time>02/21/06 04:43:36</Date_Time>
<Line_ID>7U</Line_ID>
<Bulk_Status>1</Bulk_Status>
<Product_Code>0534943</Product_Code>
</Engine_Data>
- <Engine_Data>
<PSN>7U0C00FGZ</PSN>
<Module_Code>0202879</Module_Code>
<HWID>6000</HWID>
<SWID>RH79BR004</SWID>
<Station_ID>7URFT-01</Station_ID>
<Date_Time>02/21/06 09:11:08</Date_Time>
<Line_ID>7U</Line_ID>
<Bulk_Status>1</Bulk_Status>
<Product_Code>0534943</Product_Code>
</Engine_Data>

几句代码就可以了

写代码出来看看，最好写成函数的形式。

熟悉节点就自己用Tstrings写就可以了，保存为xml或者用TXMLDocument这个控件

怎么没有人回答呢？
等待中！

還在等待xml的高手的出現!

拼字符串就是了，用一个TStringList一行一行往里面写，写完保存到文件就可以了。

有源代碼最好了，數據全是從數據庫中抓取得。

有源代碼最好了，數據全是從數據庫中抓取得。

还在等待中

在等等

多人接受答案了。