Что с кодом

[grafgrial]

не могу понять как парсировать данный текст. проверьте

<span id="ctl00_PlaceHolderMain_atiTrace_ lblTotalDistance">674</span>

<span id="ctl00_PlaceHolderMain_atiTrace_ lblTotalTime">14:54</span>

b:=pos('<span id="ctl00_PlaceHolderMain_atiTrace_lblTotalDistance">',st);
c:=pos('</span>',st);
mess:=copy(st,b+59,c-b-59);

a:=pos('<span id="ctl00_PlaceHolderMain_atiTrace_lblTotalTime">',st);
b:=pos('</span>',st);
prof:=copy(st,a+55,b-a-55);
lbl8.Caption:=mess;
lbl9.Caption:=prof;

прописал вот так но не показывает

[Stilet]

предлагаю так:

   const s='<b><font color="#880000"><span id="ctl00_PlaceHolderMain_atiTrace_ lblTotalDistance">674</span>&nbsp;км</font></b>';
      ss='<span id="ctl00_PlaceHolderMain_atiTrace_ lblTotalDistance">';
var
 c:string;
 i:integer;
begin
  i:=pos(ss,s);
  c:=copy(s,i+length(ss),pos('</span>',s)-(i+length(ss)));
  write(c);readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.

[grafgrial]

так не получится у меня же постоянно цифра меняется
Ошибки в вычислении кол-ве символов

c-b-59);
b-a-55);

[Пепел Феникса]

grafgrial, а вы попробовали код Виталия?
он более универсален.

что выдает ваш код?

[grafgrial]

попробовал, но появилось бесконечное окно

[Пепел Феникса]

проверьте значения отладчиком(я про c и b), может проще найдя начало найти ручками конец(</span>)

[ZuBy]

grafgrial, код Stilet'а рабочий!

[Stilet]

но появилось бесконечное окно

А это уже говорит о том что твой цикл несовершенен.

[grafgrial]

grafgrial, код Stilet'а рабочий!

Код то рабочий! Но я не могу прикрутить его к своей программе, так как у меня сначала получает данные с инета а потом их должен обработать (хочу все это одной кнопкой, при таком раскладе бесконечное окно), а если двумя кнопками то все норм

[Пепел Феникса]

так вы работаете в одном потоке, и что вы хотите еще тогда?
попробуйте антифриз кинуть, но сильно не поможет.
новый поток начинайте, примеры на форуме есть...