[vinni]

Доброго времени суток!

Вопрос в следующем. Создаю XML-файл:

Код:

var
  XMLDoc: TXMLDocument;
  Node, Node1: IXMLNode;
begin
  XMLDoc := TXMLDocument.Create(Application);
  XMLDoc.Active := True;
  XMLDoc.Encoding := 'utf-8';
  Node := XMLDoc.AddChild('HEAD');
  Node1 := Node.AddChild('Version');
....
  XMLDoc.SaveToFile(FileName);
  XMLDoc.Free;
end;

Admin: Пользуемся тегами!!!

Так вот при открытии полученного файла например, IExplorer'ом все отлично отображается. При открытии файла Блокнотом все данные записаны в СТРОКУ, т.е. нет переноса по тегам и смотреть такой файл невозможно.

Подскажите, плиз, может как-то можно вставить перенос на следующую строку после каждого тега, чтобы получить удобочитаемый в Блокноте файл?

Заранее спасибо!

[vinni]

Нашел:
XMLDoc.Options:=XMLDoc.Options + [doNodeAutoIndent];