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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 06.04.2010, 17:16   #1
record222
Форумчанин
 
Регистрация: 23.09.2009
Сообщений: 127
По умолчанию Парсинг XML страницы

Здравствуйте! Помогите пожалуйста спарсить XML страницу. А именно 80
Код:

Код:
<urlinfo>
<url domain="Ссылка на сайт">/</url>
<tcy rang="3" value="80"/>
<topics>
</topics>
<textinfo>
</textinfo>
</urlinfo>
Пробовал вот так
Код:

Код:
B:=copy(A, POS('value="', A)+7,2);
Но бывает, что value="9999", тогда программа правильно не копирует. Как быть?
record222 вне форума Ответить с цитированием
Старый 06.04.2010, 17:35   #2
Pedro
Форумчанин
 
Аватар для Pedro
 
Регистрация: 25.03.2007
Сообщений: 166
По умолчанию

Код:
B:=copy(A, POS('value="', A)+7,pos('"/',A)-POS('value="',A)-7)
Pedro вне форума Ответить с цитированием
Старый 06.04.2010, 17:40   #3
Grag
А может и не...
Участник клуба
 
Аватар для Grag
 
Регистрация: 27.03.2010
Сообщений: 1,269
По умолчанию

Попробуй так:
Код:
B:=Copy(A,LastDelimiter('="',A)+2,Pos(LastDelimiter('"/',A)-(LastDelimiter('="',A)+2)))
Перемешивай дело с бездельем и не сойдешь с ума...
Grag вне форума Ответить с цитированием
Старый 06.04.2010, 18:07   #4
record222
Форумчанин
 
Регистрация: 23.09.2009
Сообщений: 127
По умолчанию

Grag - Pedro, спасибо за помощью. Все работает
record222 вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Парсинг XML [Smarik] Общие вопросы Delphi 6 13.03.2010 17:38
XML (парсинг NativeXml ) и Delphi 2009 S_Yevgeniy Помощь студентам 13 17.09.2009 15:56
Парсинг страницы Terikon Общие вопросы Delphi 3 04.04.2009 00:32
парсинг страницы seoanalyzer Общие вопросы Delphi 3 13.02.2009 12:50
Парсинг HTML страницы OkeaH Работа с сетью в Delphi 1 19.01.2009 09:17