Показать сообщение отдельно
  #6  
Старый 30.04.2012, 11:50
sandysman sandysman вне форума
Новичок
 
Регистрация: 27.03.2012
Сообщения: 60
Репутация: 10
По умолчанию

Цитата:
Сообщение от NumLock
Код:
uses
  jpeg,

Image1.Picture.LoadFromFile('d:\Картинки\Фото - iPhone\IMG_0021.JPG');

Код:
var
  AMemoryStream: TMemoryStream;
begin
  AMemoryStream:=TMemoryStream.Create;
  try
    IdHTTP1.Get('http://grafmoto.narod.ru/apple.bmp', AMemoryStream);
    AMemoryStream.Position:=0;
    Image1.Picture.Bitmap.LoadFromStream(AMemoryStream);
  finally
    AMemoryStream.Free;
  end;
end;
спасибо, а я то думал куда надо jpeg написать, везде написано юзес, чке то не допер, что это юнит)
Ответить с цитированием