|
|
#1
|
|||
|
|||
web->текстовую переменную
Уважаемые коллеги!
Есть ли простая компонента для преобразования веб-странички по заданному адресу в текстовую переменную(визуализация страницы не требуется)? Т.е. в идеале функция web2str(url: WideString) : string; Задача выдернуть из списка html-страниц однотипные куски текста, которые легко искать в текстовой переменной. К сожалению, нашел, только сложные примеры парсеров, XML, DOM и т.д. Мне кажеться должно быть все проще... Последний раз редактировалось Kot137, 04.01.2009 в 20:31. Причина: не совсем корректная формулировка вопроса |
#2
|
|||
|
|||
Перерыл несколько форумов и описание TWebBroser - вот получился рабочий код:
Код:
procedure TForm1.Button2Click(Sender: TObject); var Doc: Variant; txt: string; begin Doc:= WebBrowser1.Document; txt:=doc.documentElement.innerHTML; richedit1.Lines.Add(txt) end; |
#3
|
||||
|
||||
Поищи на тему как загрузить файл из интерната. И загружай страницу. Никакие компоненты не нужны.
_http://www.delphisources.ru/pages/faq/base/get_file_from_net_with_http.html вот перва я ссылка, просто чуть чуть измени пример. ...сказал, и загрустил от бесспорной своей правоты |
#4
|
|||
|
|||
Спасибо. Хороший пример. Ближайшее время переделаю вместе с перходом на многопоточность.
|