Delphi парсинг ссылок с HTML страницы - delphi 7
16.05.2013, 00:30 | |
Delphi парсинг ссылок с HTML страницы В статье покажу пример сбора ссылок с HTML страницы. В инете есть куча статьей как сделать на delphi сбор ссылок ну или delphi парсинг ссылок у каждого свой вариант. Создаём процедуру для парсинга ссылок. procedure parser(html:string); //Процедура для парсинга кода begin while Pos('href="', html) <> 0 do begin Delete(html, 1, Pos('href="', html) + Length('href="') - 1); Form1.Memo1.Lines.Add(Copy(html, 1, Pos('"', html) - 1)); Application.ProcessMessages; end; end; Объясню всё подробно. От начало и до конца кода, мы приходимся и проверяем есть ли (href="), если присутствует, то парсим то что в (href="***") и удаляем за собой в коде html, дабы не добавлялись дубликаты. Теперь нам надо получить HTML код и получить список ссылок. Добавляем на фому: Memo1, IdHTTP1 и Button1. В обработчик onclick для кнопки, пихаем такой код. ? 1 parser(IdHTTP1.Get('http://stex.at.ua/')); Ну и получим список ссылок которые есть в тэге href="". И всё! :) ТАк же можно сделать на delphi сбор url картинок. | |
| |
Просмотров: 2629 | Загрузок: 0 | |
Всего комментариев: 0 | |