Einzelnen Beitrag anzeigen

moelski

Registriert seit: 31. Jul 2004
1.110 Beiträge
 
Delphi 2010 Professional
 
#1

OmniXML und Save methode mit ofIndent

  Alt 23. Mär 2009, 21:32
Moin !

Also entweder mache ich hier was grundlegend falsch, oder da gibts ein Problem bei OmniXML.
Ich habe folgende einfache XML Datei:

XML-Code:
<?xml version="1.0" encoding="(UTF-8)"?>
<Language>
  <Form>
    <Caption>Dies ist der Text</Caption>
  </Form>
</Language>
So und nun nutze ich folgenden Quellcode:
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
var xmlDoc : IXMLDocument;
begin
  xmlDoc := CreateXMLDoc;
  xmlDoc.Load(ExtractFilePath(Application.ExeName) + '\Lang.xml');
  xmlDoc.Save(ExtractFilePath(Application.ExeName) + '\Lang.xml', ofIndent);
end;
Das ist total sinnfrei ... Ich weiss. Aber normalerweise ändere ich zwischen dem Lesen und dem Schreiben noch Werte.
So jedenfalls wenn ich das nach dem Speichern ansehe würde ich erwarten das die XML Datei immer noch so ausschaut wie vorher. Aber statt dessen schaut die dann so:
XML-Code:
<?xml version="1.0" encoding="(UTF-8)"?>




<Language>
  
  
  <Form>
    
    
    <Caption>No errors found in XML document!</Caption>
  
  
  </Form>


</Language>
Wo kommen die ganzen Leerzeilen weg ?! Ich blicks gerade nicht.
Dominik Schmidt
Greetz Dominik

I love Delphi 2007/2010
  Mit Zitat antworten Zitat