форматирование XML

[altcore]

Кто как форматирует XML c данными ?

Для создания XML использую класс IXMLDOMDocument2. При сохранении он формирует однострочный текстовый файл. В принципе при парсинге это не мешает, но хотелось бы сделать красиво. Значит по форматированию нашел эту заметку: http://support.softlab.ru/Portal/Sam...ple.asp?id=360.

Переписал себе что-то вроде:

procedure SaveXMLDocWithFormat(doc: IXMLDOMDocument2; sCoding: string; fName : string);
var
  doc2 : IXMLDOMDocument2;
  Writer :IMXWriter;
  Reader :ISAXXMLReader;
begin
doc2 := CoDOMDocument.Create;
doc2.async := false;
Writer := CoMXXMLWriter.Create;
Reader := CreateComObject(CLASS_SAXXMLReader) as ISAXXMLReader;

Writer.indent := true;
Writer.encoding := sCoding; //'UTF-8';
Writer.output := doc2;

Reader.putContentHandler((Writer) as ISAXContentHandler); 
Reader.putDTDHandler((Writer) as ISAXDTDHandler); 
Reader.putErrorHandler((Writer) as ISAXErrorHandler); 

Reader.parse(doc);
Writer.flush;
doc2.save(fName);

pReader := nil;
pWriter := nil;

XML форматируется, т.е. теги табулируются и переносятся на новые строки, но в форматированном файле отсутствует часть тегов! Причем при моей структуре исходного XML выходит примерно следующее:

<корень>
    <запись1>
        <тег1.1>
        <тег1.2>
        <тег1.3>
    </запись1>
    <запись2>
        <тег2.1>
        <тег2.2>
        <тег2.3>
    </запись2>
    <запись3>
        <тег3.1>
    </запись3>
</корень>

Т.е. пропадают несколько записей в последнем блоке.

[mutabor]

Используя стандартный XML компонент, к-рый в поставке с Дельфи, я изменил одно свойство, не помню правда какое, и он стал переносить при сохранении в файл новые элементы на новую строку, а не лепить подряд. Ничего не пропадало.

[altcore]

Вы, наверное, имеете ввиду TXMLDocument с вкладки Internet. Насколько я помню, там нет поддержки XML Schema. А она мне нужна для валидации.

[altcore]

В общем с форматированием решил вопрос так:

...
 XMLDoc : TXMLDocument;
...

procedure SaveXML(doc: IXMLDOMDocument2; fName : string);
begin
  doc.loadXML(XMLDoc.FormatXMLData(doc.xml));
  doc.save(fName);
end;

Вышло даже слишком просто как-то )

Сейчас другой вопрос. Как IXMLDOMDocument2 сохранять в UTF-8 ?
Везде пишут, что он по умолчанию кодирует в юникод. Я даже добавил явное указание кодировки, однако при просмотре файла Notepad++ кодировка указана как "ANSI as UTF-8". Ну и при валидации проблемы вылазят, т.к. есть кириллические значения тегов.