Показать сообщение отдельно
  #2  
Старый 12.09.2007, 11:36
Аватар для The Shadow
The Shadow The Shadow вне форума
Продвинутый
 
Регистрация: 11.06.2007
Адрес: Уфа, Россия
Сообщения: 793
Репутация: 35
По умолчанию

Можно так:
Код:
procedure DownloadImage(URL: String);
var
Img: TFileStream;
begin
Img:=TFileStream.Create('Img.jpg', fmCreate);
try
IdHTTP1.Get(URL, Img);
except
end;
Img.Free;
Image1.Picture.LoadFromFile('Img.jpg');
DeleteFile('Img.jpg');
end;
P.S. Если это jpg, то в uses добавь JPEG.
На форме должен быть компонент IdHTTP.
Это конечно не MemoryStream, но пойдет. =)
__________________
Что делать, когда сломался комп:
1. Если вы юзер - делать ноги.
2. Если ремонтник - делать деньги.
3. Если вы программист - делать вид, что так было задумано.
Ответить с цитированием