Mega Code Archive

 

Categories / Delphi / ADO Database

 

Xml parser kullanımı

XML dosyamız <?xml version="1.0"?> <rehber> <kisi> <ad>Deneme1</ad> <tel>123456</tel> </kisi> <kisi> <ad>Deneme2</ad> <tel>654321</tel> </kisi> </rehber> şeklinde olsun. Bu anlatılanlar yukarıdaki gibi temel xml dosyalarında geçerlidir. ClientDataSet gibi bileşenlerin kullandığı Metadata XML veritabanı dosyalarında hata verebilir. Formumuza bir tane XML bileşeni yerleştirelim (galiba internet sekmesindeydi) var root : IXMLNode; a : IXMLNode; i : Integer; begin XMLDocument1.LoadFromFile('C:\test.xml'); a:=XMLDocument1.DocumentElement; for i:=0 To a.childNodes.Count -1 Do begin root:=XMLDocument.DocumentElement.ChildNodes[i]; ListBox1.Items.add(root.ChildNodes['ad'].Text); end; end;