| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Добавить пролог в XML-файл [D6]

Ольга ©   (2005-05-30 15:52:00) 

Создала xml-файл, хочу добавить в начало строчку <?xml version="1.0" encoding="UTF-8"?> Создаю, как DocumentElement с атрибутами. Видимо, это неправильно.

procedure CreateXML;
 var    iXml: IXMLDocument;
        iRoot, iNode: IXMLNode;
 begin
      XMLDoc.Active := False;
      XMLDoc.XML.Text := '';
      XMLDoc.Active := True;
      XMLDoc.DocumentElement:= XMLDoc.CreateNode('xml');

      iRoot:=XMLDoc.DocumentElement;
      iRoot.SetAttribute('version','"1.0"');
      iRoot.SetAttribute('encoding','"UTF-8"');
      ...
 end;
 Подскажите, люди добрые, как это делается?

---

Ольга   (2005-05-30 17:29:00) [1]

Спасибо.

---

Гаврила   (2005-05-30 17:16:00) [2]

XMLDoc.Encoding:='UTF-8';
XMLDoc.Version:='1.0';

---

Наверх