Показать сообщение отдельно
  #2  
Старый 15.11.2008, 13:16
Аватар для mak-karpov
mak-karpov mak-karpov вне форума
Активный
 
Регистрация: 18.09.2008
Сообщения: 235
Версия Delphi: 2010 и 7
Репутация: 1242
По умолчанию

Ставишь компонент TIdHTTP;
Код:
var ms : TMemoryStream;
begin
  ms := TMemoryStream.Create;
  IdHTTP1.Get('<адрес файла в интернете>', ms);
  ms.SaveToFile('<имя файла>');
__________________
Кнопка "+" - весы в правом верхнем углу сообщения...
Ответить с цитированием