Парсинг XML страницы

[record222]

Здравствуйте! Помогите пожалуйста спарсить 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", тогда программа правильно не копирует. Как быть?

[Pedro]

B:=copy(A, POS('value="', A)+7,pos('"/',A)-POS('value="',A)-7)

[Grag]

Попробуй так:

B:=Copy(A,LastDelimiter('="',A)+2,Pos(LastDelimiter('"/',A)-(LastDelimiter('="',A)+2)))

[record222]

Grag - Pedro, спасибо за помощью. Все работает