[Trolly]

Не могу никак разобраться, как скачать файл и сохранить его рядом с программой? Примеры что нашел в сети не работают. Пишу в Delphi7.
Подскажите пожалуйста как скачивать обновлённый файл *.ini с заменой старого и сохранением в папке с программой?

[RusMaXXX]

ты хоть фрагмент кода покажи, там видно будет где ошибка

[Trolly]

Код:

1 2 3 4 5 6 7 8

procedure TForm1.Button2Click(Sender: TObject); var LoadStream: TMemoryStream; begin  LoadStream := TMemoryStream.Create; // выделение памяти под переменную  idHTTP1.Get(Edit5.Text, LoadStream); // загрузка в поток данных из сети  LoadStream.SaveToFile(Edit6.Text); // сохраняем данные из потока на жестком диске  LoadStream.Free; // освобождаем память end;

При нажатии на кнопку сразу ошибка (абракадабра) и всё.

[Trolly]

Нашел здесь на форуме подходящий вариант, но и он не работает.

Код:

1 2 3 4 5 6 7

procedure TForm1.Button1Click(Sender: TObject); fs: TFileStream; begin fs:=TFileStream.Create('Setting.txt', fmCreate); IdHTTP.Get('https://dl.dropbox.com/u/70247065/Setting.txt', fs); fs.Free; end;

Выделяется красным IdTCPServer и всё. Что делать?

[NumLock]

Код:

1 2 3 4 5 6 7 8 9 10

var   FileStream: TFileStream; begin   FileStream:=TFileStream.Create('Setting.txt', fmCreate);   try     IdHTTP1.Get('http://dl.dropbox.com/u/70247065/Setting.txt', FileStream);   finally     FileStream.Free;   end; end;

[Trolly]

Всё равно выделяется красным IdTCPServer.

[NumLock]

у меня в примере нет IdTCPClient и IdTCPServer

[Trolly]

Сообщение от NumLock

у меня в примере нет IdTCPClient и IdTCPServer

Я тоже не использую эти элементы, но прога ругается на них.
IdHTTP ведь берётся из палитры Indy Clients ?

[NumLock]

Сообщение от Trolly

Выделяется красным IdTCPServer

покажи на картинке

[Trolly]

Вот что после запуска появляется

[M.A.D.M.A.N.]

Перебилди все.

[Trolly]

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

Перебилди все.

Чевось сделать?

[M.A.D.M.A.N.]

Поставь нормальную версию дельфи с инди.

[Trolly]

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

Поставь нормальную версию дельфи с инди.

Какую нормальную? Я не понимаю, что значит нормальную...

[NumLock]

код из 5-го сообщения в пустом проекте компилируется/работает?