Показать сообщение отдельно
  #3  
Старый 13.01.2011, 19:10
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Вообще, представленный код (html) некорректный или неполный.
Если код корректный, то можно воспользоваться парсером от Microsoft и тогда получить вирутальное дерево, в котором и искать нужную информацию.

А так, можно по быстрому попробовать следующим образом:
Код:
const
  sBeg = '<td align="right"><span class="arial">Country code:</span></td';
  sEnd = '</td>';
var
  iStart, iEnd : Integer;
  sSrc, sTgt : String;
begin
  sSrc := idHTTP.Get(...); // как ты получаешь страничку

  iStart := Pos(sBeg,sSrc) + Length(sBeg);
  iEnd := PosEx(sEnd,sSrc,iStart)-1;
  sTgt := Copy(sSrc,iStart,iStart-iEnd);
Ответить с цитированием