Тема: stream и ico
Показать сообщение отдельно
  #4  
Старый 17.11.2012, 16:28
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от positivesmile
procedure TForm1.Button1Click(Sender: TObject);
var
ms: TMemoryStream;
begin
ms := TMemoryStream.Create;
idHttp1.Get('http://www.delphisources.ru/favicon.ico', ms);
//ms.SaveToFile('d:\delphisources.ico');
Image1.Picture.Icon.LoadFromStream(ms);
end;

Пишет "stream read error"
Перед загрузкой в Image1 сбрасывай позицию потока в 0 чтобы чтение шло с начала потока:
Код:
ms.Position := 0;
Ответить с цитированием