Парсинг в WebBrowser

[SpaceCrow]

Как в tWebBrowser возможно спарсить текст?
Например от <li>Донат счет<span> до </span>, то есть мне нужно получить 0 руб.

<li>Донат счет<span>0 руб.</span>

Вот так выглядит вся статистика которую нужно спарсить и вывести в memo

Через Indy не выйдет, уже пробовал, не отображается полный код страницы. Сам сайт где нужно парсить http://www.diamondrp.ru

[VladWH]

Например, можно так...

var I: Integer; Elements: IHTMLElementCollection;
begin // получаем список элементов документа с тегом "span"
Elements := (wb1.Document as IHTMLDocument3).getElementsByTagName('span');
for I := 0 to Elements.length - 1 do // перебираем их
 // тут какое то условие, например такое
 if Pos('руб', (Elements.item(I, 0) as IHTMLElement).innerText)>0 then
  // если тот элемент, который искали, то сообщаем об этом
  ShowMessage((Elements.item(I, 0) as IHTMLElement).innerText);

P.S. в uses добавить модуль MSHTML, wb1 - TWebBrowser