VPF::Вопрос по работе с xml-файлом. - Форум программистов

ajunta

Дата 20.4.2007, 14:57 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 21
Регистрация: 20.4.2007

Репутация: нет
Всего: нет

Создаю xml - файл так:

Код


var
 coDoc        : CoDomDocument ;
 Doc          : DomDocument ;
 r            : IXMLDOMElement;
 Node         : IXMLDOMElement;
 txt          : IXMLDOMText;

begin

 Doc:=coDoc.Create;
 Doc.Set_async(false);
 Doc.LoadXML('<Header/>');
 r:=Doc.Get_documentElement;

 Node := Doc.createElement ( 'Rec0');
 
 r.appendChild(Node);

 r:=node;

 Node := Doc.createElement ( 'Rec1');
 txt := Doc.createTextNode( 'Val1');
 Node.appendChild(txt);
 r.appendChild(Node);
 Node := Doc.createElement ( 'Rec2');
 txt := Doc.createTextNode( 'Val2');
 Node.appendChild(txt);
 r.appendChild(Node);

Как теперь, зная цепочку Rec0 -> Rec1 получить значение в этом Rec1?

M
Alexeis

Модератор: используйте подсветку кода http://forum.vingrad.ru/index.php?showtopic=126445

Это сообщение отредактировал(а) Alexeis - 20.4.2007, 15:38

artemiy

Дата 20.4.2007, 16:46 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 121
Регистрация: 22.2.2007

Репутация: нет
Всего: нет

Точно не помню (пишу по памяти)

Код



 XML:=TXMLDocument.Create(self);
 XML.FileName:=FileName;
 XML.Active:=true;

 Node:=Xml.DocumentElement.ChildNodes['Rec0'];
 value:=Node.ChildNode['Rec1'].text;

ajunta

Дата 20.4.2007, 16:57 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 21
Регистрация: 20.4.2007

Репутация: нет
Всего: нет

Спасибо конечно но хотелось бы поточнее, тк. FileName Active DocumentElement у него судя по всему нету.

artemiy

Дата 20.4.2007, 18:50 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 121
Регистрация: 22.2.2007

Репутация: нет
Всего: нет

Извиняюсь за неточность...
FileName - это имя загружаемого XML файла
Active - это стандартное свойство TXMLDocument
А через DocumentElement ты можешь досучаться до главного нода (элемента) в структуре XML документа.

Код


<main>
  <rec0>
    <rec1>Value of Rec1 node<rec1>
  </rec0>
</main>

Т.е. до элемента <main>. И потом ты перебираешь его дочерние элементы пока не найдешь нужный.

ajunta

Дата 20.4.2007, 19:17 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 21
Регистрация: 20.4.2007

Репутация: нет
Всего: нет

Цитата(artemiy @ 20.4.2007, 18:50)

FileName - это имя загружаемого XML файла
Active - это стандартное свойство TXMLDocument

Ну про содержание filename понятно, но хотелось бы узнать как собственно имея filename:string подключиться к этому файлу? Там имеется XML.Assign( TPersistent ); А вот что с ним можно сделать... ?

Active у меня компилятор не принимает....

artemiy

Дата 25.4.2007, 11:11 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 121
Регистрация: 22.2.2007

Репутация: нет
Всего: нет

Вот рабочий пример ;)

Присоединённый файл ( Кол-во скачиваний: 32 )

XML.rar 8,35 Kb

ajunta

Дата 26.4.2007, 16:27 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 21
Регистрация: 20.4.2007

Репутация: нет
Всего: нет

УРА! artemiy, большое спасибо!)))

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »