Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.08.2009, 14:05   #1
Miningo
Новичок
Джуниор
 
Регистрация: 06.08.2009
Сообщений: 4
По умолчанию XMLDocument

есть такой вот xml
Код:
<?xml version="1.0" encoding="utf-8" ?> 
- <big>
- <tabs>
  <bit id="209456382"  level="3"  x="215" y="879" /> 
  <bit id="209125382"  level="3"  x="215" y="819" /> 
  <bit id="204565382"  level="3"  x="215" y="829" />
  <bit id="209125382"  level="4"  x="215" y="839" />
  <bit id="205555382"  level="5"  x="215" y="849" />
  <bit id="244355582"  level="5"  x="215" y="859" />
  <bit id="209563382"  level="8"  x="215" y="869" />
надо вытащить значения id level x и y. Я делаю вот так:
Код:
ListBox2.Items.Add(VarToStr(XMLDocument1.DocumentElement.ChildNodes[0].ChildNodes['bit'].Attributes['id']));
Но прочитать могу только первые id level и т.д.
как прочитать следующие строки???
Miningo вне форума Ответить с цитированием
Старый 07.08.2009, 14:38   #2
Miningo
Новичок
Джуниор
 
Регистрация: 06.08.2009
Сообщений: 4
По умолчанию

Тишина ! ! !
Miningo вне форума Ответить с цитированием
Старый 07.08.2009, 14:47   #3
Snoopy
Форумчанин Подтвердите свой е-майл
 
Аватар для Snoopy
 
Регистрация: 14.01.2008
Сообщений: 163
По умолчанию

Код:
var
Note:IXMLNode;
v:variant;
begin
Note:=XMLDocument1.DocumentElement.ChildNodes[0].ChildNodes[i];
v:=Note.Attributes['id']+' '+Note.Attributes['level']+' '+Note.Attributes['x']+' '+Note.Attributes['y'];
end;
istBox2.Items.Add(VarToStr(v));
Приблизительно у вас такая структура должна быть, что бы считать все параметры
Могу гдето ошибится
Snoopy вне форума Ответить с цитированием
Старый 07.08.2009, 14:59   #4
Miningo
Новичок
Джуниор
 
Регистрация: 06.08.2009
Сообщений: 4
По умолчанию

Спасибо большое, всё работает!!!
Miningo вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
XMLDocument AidarBik Общие вопросы Delphi 19 18.02.2009 21:41
XMLDocument Sanek777 Общие вопросы Delphi 2 04.11.2008 16:15