|
#1
|
|||
|
|||
Парсер текста
Здравствуйте
Уважаемы кодеры помогите решить задачку так как сам с ней не в состоянии справится есть html страница полученная через get запрос так вот как мне из неё выдернуть нужный мне текст (не 1 строка а несколько) работаю в потоке. код который у меня получился Он работает но иногда выдаёт всякую хрень тобич не то что должно быть Код:
Delete(g,1,pos('<ul id="userbar_list_3" class="jcarousel-skin-referal">',g)+length('<ul id="userbar_list_3" class="jcarousel-skin-referal">')); output1:=copy(g,1,pos('</ul>',g)-1); sRez := ''; s := output1; isTag := false; for i:=1 to Length(s) do begin if s[i]='" style="' then isTag := true else begin if not isTag then sRez := sRez + s[i] else if s[i]='ublink=' then begin sRez := sRez + ' '; isTag := false; output1:= sRez; end; end; end; |
#2
|
||||
|
||||
См. Рег. выражения
— Как тебя понимать? — Понимать меня не обязательно. Обязательно меня любить и кормить вовремя. На Delphi, увы, больше не программирую. Рекомендуемая литература по программированию |
#3
|
|||
|
|||
Цитата:
можно поподробней пожалуйста |
#4
|
||||
|
||||
Цитата:
P.S. Файл regexpr.pas во вложении! А вобще, можно и через стандартные функции нахождения позиции, но будет через меру большой код! |
#5
|
||||
|
||||
Пишу программы за еду. __________________ |