Показать сообщение отдельно
  #2  
Старый 05.12.2012, 21:18
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,087
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Потому что после загрузки у тебя указатель внутри потока стоит в конце данных. Надо его передвинуть на начало. Кстати, сохранять в файл совсем не обязательно. И удалять объекты надо в try..finally.

Код:
var F:TMemoryStream;
begin
 F:=TMemoryStream.Create;
 Try
   idHTTP1.Get('http://yandex.st/morda-logo/i/logo.png',f);
   F.Seek(0,0);
   image1.Picture.Bitmap.LoadFromStream(F);
 Finally
   f.Free;
 End;
end;
Ответить с цитированием