[Kewa2008]

Сообщение от D.M.

Здравствуйте. Задали, в универе, написать небольшую програмку для скачивания сайта целиком. Что то по типу Offline Explorer. Есть ли какие-то подобные примеры, или статьи? Может в учебниках каких было? Больше всего интересует вопрос: как сохранять веб страницы? Заранее спасибо.

Чтобы сохранить станицу работай с Indy

Код:

var
rcvrdata: TMemoryStream;
pat:string;
...
begin
pat := 'D:\data\log.html';
rcvrdata := TMemoryStream.Create;
IdHTTP1.Get('http://yandex.ru/', rcvrdata);// получаем код страницы
if rcvrdata.Size > 0 then // результат пустой?
    begin
      rcvrdata.Seek(0, soFromBeginning); // становимся на начало потока
      rcvrdata.SaveToFile(path);  // сохраняем в файл
    end;
end;

Так же можно напистаь не большой парсер, который будет находить все ссылки на странице и сохранять их тоже.

Код не компилировал, мб не совем рабочий =)