hätte auch noch via
himXML sowas bieten können ... via Standardeinstellung sieht es ja so aus diese Formatierungen werden beim Auslesen ignoriert
Delphi-Quellcode:
xml: TXMLFile;
xml := TXMLFile.Create;
xml.LoadFromFile(...);
xml.SaveToFile(...);
xml.Free;
aber hierzu
Delphi-Quellcode:
xml.Text := AnsiReplaceText(
xml.Text,'
<',#13#10 + '
<');
xml.Text := AnsiReplaceText(
xml.Text,#13#10 + '
</','
</');
xml.Text := AnsiReplaceText(
xml.Text,'
></','
>' + #13#10 + '
</');
die Zeile 1 entspricht der Zeile 2, also werden bei </ 2 Leerzeilen davor eingefügt
und die dritte Zeile macht nie was, da Zeile 1&2 ebenfalls diesem Muster entsprechen, demnach schon Umbrüche eingefügt sind und es keine ></ mehr gibt.