Закачать информацию с сайта

[KWN, lnc]

Здравствуйте, уважаемые эксперты! Вопрос в следующем как из интернета подробно закачать и выгрузить информацию? скажем так

1. label1.caption := соеденение с файлом. скажем http://google.ru/info.ini
2. закачать этот файл в папку скажем C:\prog\info.ini
3. label2.caption := проверка информации
программа в этот момент ишет файле строки. скажем

[caption1]
str1=
str2=
[caption2]
str1=
str2=

4. label3.caption := успешно или провал
если строка Caption совпадает тогда от туда подставляет
Edit1.Text := str1
Edit2.Text := str2

Просьба всем оказать посильную помощь.

[Stilet]

Рекомендую
http://www.delphiworld.narod.ru/_all_articles_.html
раздел Файлы и Интернет - [18]

[KWN, lnc]

А можно подробнее... я просто там нашел только уведомление о скорости. может кто исходник даст?! пожалуйста!!!

[Пепел Феникса]

исходник чего?
как скачать файл?
idhttp.get(<адрес>);
а парсить через TStringList можно.
примеров ну уйма.

[KWN, lnc]

Пепел Феникса, пытался не вышло. может поможете? плиз

[Usov]

var
    fs: TFileStream;
begin
  fs := TFileStream.Create('полный_локальный_путь_с_именем_файла', fmCreate);
  idHttp.Get('ссфлка_на_файл', fs);
  fs.Free;
end;

[Stilet]

пытался не вышло

Попытки в студию )

[KWN, lnc]

Примерно тоже самое что и здесь.

var
    fs: TFileStream;
begin
  fs := TFileStream.Create('полный_локальный_путь_с_именем_файла', fmCreate);
  idHttp.Get('ссфлка_на_файл', fs);
  fs.Free;
end;

где ставить уведомления? вот в чем вопрос. (((

[Stilet]

Не ну в целом вроде правильно все.
А что именно из этого кода не работает?

[KWN, lnc]

Да проблема в том что я ума не дам где уведомление поставить

1. label1.caption := соеденение с файлом (найден или нет)
2. label2.caption := проверка информации (ищет совпадения в строке)
3. label3.caption := успешно или провал (найдено или нет)