Поиск в HTML-коде

[M@G]

вот такая проблема
нужно из html кода или из загруженной из инета страници взять некоторые цифры и отобразить их в TLabel
Примерный код

Тра та та 
Тра та та 
Тра та та 

 <TD class=text_head2>644</TD>
          <TD class=text_head2>20</TD>
          <TD class=text_head2>40</TD>

Тра та та 
Тра та та 
Тра та та

естественно надо взять 3 Label чтобы у одного получилось 644 у второго 20 у третьего 40
Заранее спасибо

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

парсинг.
с этим словом в поиск по форуму, есть не мало примеров.

[M@G]

Да точно есть нашол именно то что нужно. Ноооо только это не работает как надо. Можно привести пример к моему вопросу

[shock-in]

function GetSubStr(InputStr, BeginStr, EndStr: String): String;
var
  s: String;
  sp, ep: Integer;
begin
  Result := '';
  if pos(BeginStr, InputStr) <> 0 then begin
    sp := pos(BeginStr, InputStr)+length(BeginStr);
    s := copy(InputStr,sp,length(InputStr));
    ep := pos(EndStr,s)-1;
    Result := copy(s,1,ep);
  end;
end;

[M@G]

вывод:
Label1.Caption:=GetSubStr(memo2.Tex t,'<TD class=text_head2>','<');

Спасибо тебе добрый человек

[M@G]

при вводе

Label1.Caption:=GetSubStr(memo2.Text,'<TD class=text_head2>','<');
 Label2.Caption:=GetSubStr(memo2.Text,'<TD class=text_head2>','<');
 Label3.Caption:=GetSubStr(memo2.Text,'<TD class=text_head2>','<');

программа выводит одно число 644 а мне нужны все числа помогите туплю

[mihali4]

http://www.programmersforum.ru/showthread.php?t=5344
И еще миллион таких тем. В поиск.
Закрыто