[Rosenkrantz]

Код:

function CreatePage(XML:IXMLDocument;page:integer):boolean;
var
  ParentNode,ChildNode : IXMLNode;
begin
  try
    ParentNode := XML.DocumentElement.AddChild('page');
    with ParentNode do begin
      Attributes['id']    := page;
      Attributes['title'] := 'no title';
      Attributes['descr'] := '***';
    end;
     ChildNode := ParentNode.AddChild('t');
      with ChildNode do begin
        Attributes['id'] := '1';
        Text             := 'none;
      end;
    XML.SaveToFile('test.xml');
   finally
  end;
end;

Вот выделенная строка - она сохраняет неформатированный текст XML.
А где вы пытаетесь сохранить форматированный после добавления <page>? Я в коде этого места не вижу.