Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.03.2012, 13:25   #1
Painkiller_13
Пользователь
 
Регистрация: 07.07.2011
Сообщений: 58
По умолчанию Удаление текста

Есть хтмл код нужно удалить в нем текст от определенного место до друго определенного места.
Например:
Код HTML:
</table>
<tr>
<td class="row1"><p class="gensmall">
</tr>
</table>
Нужно вырезать текст <td class="row1"><p class="gensmall">
который находиться от <tr> до </tr>.
Как это можно реализовать?
Painkiller_13 вне форума Ответить с цитированием
Старый 27.03.2012, 14:13   #2
FaTaL
Участник клуба
 
Аватар для FaTaL
 
Регистрация: 09.11.2007
Сообщений: 1,761
По умолчанию

Грузи текст в TStringList и в цикле for downto do проверяй, есть ли есть строчка начинающаяся на <td class=, то удаляй эту строку.

Последний раз редактировалось FaTaL; 27.03.2012 в 14:17.
FaTaL вне форума Ответить с цитированием
Старый 27.03.2012, 14:23   #3
Painkiller_13
Пользователь
 
Регистрация: 07.07.2011
Сообщений: 58
По умолчанию

Забыл уточнить надо будет удалять более чем одну строку
и текст от которого надо будет искать не будет с новой строки то есть
надо начать удаление из середины например одной строки и закончить через строки 3-4 тоже в середине.
Painkiller_13 вне форума Ответить с цитированием
Старый 27.03.2012, 14:29   #4
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
и текст от которого надо будет искать не будет с новой строки то есть
да это безразлично.
грузите в TStringList, берите .Text и ищите, удаляйте, заменяйте - творите всё, что душеньке угодно!



p.s. ОЧЕНЬ удобно в подобных задачах использовать регулярные выражения (например, TRegExpr), но потребуется знание, что такое регулярные выражения и умения использовать компонент. Имхо, стоит научиться..
Serge_Bliznykov вне форума Ответить с цитированием
Старый 27.03.2012, 14:42   #5
Painkiller_13
Пользователь
 
Регистрация: 07.07.2011
Сообщений: 58
По умолчанию

А если использова Delete Pos
Delete(rss,1,pos('<tr>',rss)+length ('<tr>'));
Delete(rss,pos('</tr>',rss),length(rss));
Вот например правда делает тут функция делает все наооборот. Все удаляет и оставляет между тегов текст.
Painkiller_13 вне форума Ответить с цитированием
Старый 28.03.2012, 22:26   #6
Painkiller_13
Пользователь
 
Регистрация: 07.07.2011
Сообщений: 58
По умолчанию

Можете пожалуйста приведите примерный код решения.
Painkiller_13 вне форума Ответить с цитированием
Старый 31.03.2012, 14:35   #7
Painkiller_13
Пользователь
 
Регистрация: 07.07.2011
Сообщений: 58
По умолчанию

Delete(rss,pos('<tr>',rss),pos('<tr >',rss));
Но при наличии пробелов выводит некорректный результат.
Painkiller_13 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удаление ссылок с текста ZuBy Общие вопросы Delphi 8 10.03.2012 13:09
Удаление буквы из текста nervniy Помощь студентам 2 24.05.2011 23:26
Удаление слов из текста Gery Помощь студентам 24 22.09.2009 14:37
Удаление фрагмента текста Шурик Общие вопросы Delphi 0 31.05.2009 16:11
удаление текста с конца Lonix Общие вопросы Delphi 7 12.07.2007 14:00