|
Hi Friends,
I must create a XML file in Delphi. But i don't
know XML. I have a XML file format.
<?xml version="1.0"
standalone="yes"?>
<DATAPACKET Version="2.0">
<METADATA>
<FIELDS>
<FIELD attrname="ADI_SOYADI" fieldtype="string"
WIDTH="35"/>
<FIELD attrname="FIRMA_UNVANI" fieldtype="string"
WIDTH="35"/>
<FIELD attrname="TELEFON" fieldtype="string"
WIDTH="15"/>
<FIELD attrname="E_POSTA" fieldtype="string"
WIDTH="50"/>
<FIELD attrname="IDO_REF_NO" fieldtype="string"
WIDTH="13"/>
<FIELD attrname="ADRES" fieldtype="string"
WIDTH="140"/>
<FIELD attrname="POSTA_KODU" fieldtype="string"
WIDTH="8"/>
<FIELD attrname="SATIS_TARIHI" fieldtype="string"
WIDTH="10"/>
<FIELD attrname="SATIS_SAATI" fieldtype="string"
WIDTH="8"/>
<FIELD attrname="TESLIM_OLACAK_TARIH" fieldtype="string"
WIDTH="10"/>
<FIELD attrname="TESLIM_OLACAK_SAAT" fieldtype="string"
WIDTH="8"/>
<FIELD attrname="MKURKE_OPB_KODU" fieldtype="string"
WIDTH="3"/>
<FIELD attrname="BILETLER" fieldtype="nested">
<FIELDS>
<FIELD attrname="BILET_NO" fieldtype="string"
WIDTH="15"/>
<FIELD attrname="BILET_DEGER" fieldtype="string"
WIDTH="15"/>
</FIELDS>
<PARAMS/>
</FIELD>
</FIELDS>
<PARAMS/>
</METADATA>
<ROWDATA>
</ROWDATA>
</DATAPACKET>
I create this file with TMemo line.
Memo1.Lines.Add('<ROW');
Memo1.Lines.Add('ADI_SOYADI="'+Query1Namesurname.AsString+'"');
--------
Memo1.Lines.Add('/>');
But i can not add sub item for
<FIELD attrname="BILETLER"
fieldtype="nested">
<FIELDS>
<FIELD attrname="BILET_NO"
fieldtype="string" WIDTH="15"/>
<FIELD attrname="BILET_DEGER"
fieldtype="string" WIDTH="15"/>
</FIELDS>
How can i added it?
Best regards,
Mehmet
| 