Запускаю программу, нажимаю на кнопку «Загрузить». Готово! Исходный код страницы блога загружен в TMemo.
Внешний вид моей программы можно посмотреть на картинке к статье.
memo1.Lines.Text:= IdHttp1.Get (‘http://mrwildwolf666.name/’);
procedure TForm1.Button1Click(Sender: TObject);
Все предельно просто. Допустим, я хочу загрузить код главной страницы своего блога, для этого я пишу следующий код:
После запуска программы нажимаем на кнопку, и программа отправляет запрос на указанный URL и выдает html код страницы.
memo1.Lines.Text:= IdHttp1.Get (‘URL страницы, исходный код которой необходимо загрузить’);
Теперь осталось самое простое, написать код. Нажимаем двойным щелчком на Button1 и в обработчике события OnClick пишем следующий код:
Из вкладки «Indy Clients» добавляем компонент TIdHTTP.
Из вкладки «Standard»: текстовое поле Memo (StdCtrls) и обычную кнопку Button (StdCtrls).
На форму помещаем 3 компонента:
Итак, пошагово рассказываю, как получить исходный код страницы сайта в Delphi в поле TMemo.
На различных форумах программистов, приводятся огромные портянки кода, в которых порой не все понятно, а времени разбираться совсем нет. На самом деле, задача, по сути, тривиальная, и в Delphi наверняка есть стандартные компоненты для её решения. Мое предположение оказалось верным.
Я потратил немало времени на поиски нужной информации, в итоге реализация была найдена. Чтобы в следующий раз не повторять поиск, я решил написать статью о том, как получить html код страницы в Delphi. Данные способ реализовывается быстро и работает отлично!
Не так давно остро стоял вопрос, как получить исходный код веб-страницы в поле TMemo в Delphi 7. Это было необходимо, для дальнейшей обработки данных размещенных на ней.
Зачастую приходится интегрировать программы с web-страницами и наоборот. Для этого используются различные программные решения.
Получаем исходный код страницы сайта в Delphi
Опубликовано автором
Как получить html код страницы в Delphi?
Как получить html код страницы в Delphi?
Комментариев нет:
Отправить комментарий