[Помогите!] парсинг

[09098]

как спарсить

</div>
<div id="header_credits" class="header_money">
43.888.486
</div>
<a id="header_uri" class="header_money" href="/indexInternal.es?action=internalPayment" onclick="openExternal('/?action=internalPaymentProxy&req=de7e1322097a9497d 5f3d07db404ba18eb5e8fa94e002b8ef6b5d04c519913d666e 23babeaeca40afbf31ef71737784d5e2fdd31bd29979180169 cdc493ca929&v=40ec31425c4f28b7');" >
2.657
</a>
</div>
</div>

мне нужно 43.888.486,2.657

зарание благодарен

[Павел.DO]

если в скайп напишешь, завтра после обеда смогу помочь

[Apo-S]

Думаю, как-то так..

function get_money(data: string): string;
var
  temp_pos : integer;
begin
  temp_pos := pos('header_money">', data) + length('header_money">') + 2;
  data := copy(data, temp_pos, length(data) - temp_pos);
  result := copy(data, 0, pos('<', data) - 3);
end;

[VeTaL_UA]

Для кого я статьи писал... http://zhyk.ru/forum/showthread.php?t=294621

Рабочий код

function Pars(s: string): string;
begin
result := Copy(s, Pos('"header_credits"', s) + 38,
                     Pos('"header_uri"', s) - Pos('"header_credits"', s) - 52);
end;