Einzelnen Beitrag anzeigen

aps

Registriert seit: 21. Sep 2003
Ort: Hameln
62 Beiträge
 
Delphi 6 Professional
 
#1

MSXML4: Formatierung der XML-Datei

  Alt 21. Sep 2003, 20:08
Hallo,

zunächst einmal danke für dieses Forum. Dank der Suchfunktion hatte ich bisher immer auf alles eine Lösung gefunden, doch jetzt weiß ich nicht mehr weiter, sodass ich nun meinen ersten Beitrag hier lassen muss.

Ich will mit MSXML 4 Daten schreiben. Meine Testroutine sieht so aus:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
  newmain : IXMLDomNode;
  newsub : IXMLDomNode;
begin
  newmain := xmlDoc.createElement('dummy');

  newsub := xmlDoc.createElement('eins');
  newsub.text := 'dadadada';
  newmain.appendChild(newsub);

  newsub := xmlDoc.createElement('zwei');
  newsub.text := 'didididi';
  newmain.appendChild(newsub);

  Liste.appendChild(newmain);
  xmlDoc.save(fAppPath + DATABASE_FNAME);
Nur wird da alles in eine Zeile geschrieben:

Code:
<dummy><eins>dadadada</eins><zwei>dididid</zwei></dummy>
Ich möchte es aber in einer auch für den Menschen lesbaren form haben, also:
Code:
<dummy>
   <eins>dadadada</eins>
   <zwei>didididi</zwei>
</dummy>
Wie kann ich das einstellen? TIA!

Edit: Ich habe den Delphi-Code jetzt auch mal als solchen gekennzeichnet und meine Frage etwas präziser formuliert.
Andreas
  Mit Zitat antworten Zitat