Thema: Delphi XML mit TJvSimpleXml

Einzelnen Beitrag anzeigen

Benutzerbild von yankee
yankee

Registriert seit: 10. Mär 2004
1.134 Beiträge
 
Lazarus
 
#2

Re: XML mit TJvSimpleXml

  Alt 24. Aug 2005, 20:14
So, etwas verspätet kommt der zweite wesentlich kürzere Teil. Irgendwie war ich einfach so müde, dass ich da nichgtmehr geschafft habe...

Also, geben wir unser Adressbuch am besten einfach in einem StringGrid aus. Also positionieren wir ein StringGrid auf unserem Formular. Unser StringGrid bekommt 2 Spalten: Für Name und Telefonnummer. Dann erweitern wir den Code unter "laden":
Delphi-Quellcode:
XmlDoc.LoadFromFile('Adressen.xml');
//Überschriften
StringGrid1.RowCount :=XmlDoc.Root.Count +1;
StringGrid1.cells[0,0] :='Name';
StringGrid1.cells[1,0] :='Telefon';

//Daten:
for i:=0 to XmlDoc.Root.Count -1 do
begin
    StringGrid1.cells[0,i+1] :=XmlDoc.Root.Items.Item[i].ItemNamed['Name'].Value;
    StringGrid1.cells[1,i+1] :=XmlDoc.Root.Items.Item[i].ItemNamed['Telefon'].Value;
end;
So, was machen wir da? Der Überschriftenteil muss wohl nicht erklären werden....
Dann gehen wir einfach alle Unterelement von Root durch und nehmen und dass jeweils das Item mit dem passendem Namen raus und dann deren Wert. Übrigens kann man nicht nur Value nehmen, sonder beispielsweise auch IntValue und so direkt den Wert im Richtigen Typ abfragen.
Simpel, ne?

So, jetzt wäre es noch schön, wenn cih ein bißchen Feedback bekäme...
Letzter Tipp: Drogen. Machen zwar nicht glücklich, geben einem aber wenigstens das Gefühl glücklich zu sein.

Have a lot of fun!
  Mit Zitat antworten Zitat