TStream

← →
ORMADA © (2004-02-09 11:51) [0]

Пишу в поток jpg
var FileStream : TFileStream;
TJPEGImage(Image1.Picture.Graphic).SaveToStream(filestream);
потом хочу загрузить из него в Image ? Как это сделать ?
Пробовал так - ругается пишет Bitamap Image is not valid
TestImage.Picture.Bitmap.LoadFromStream(filestream);
Есть идеи как это сделать?

← →
Skier © (2004-02-09 11:55) [1]

>ORMADA © (09.02.04 11:51)
А конвертировать перед сохранением из JPEG в BMP кто будет ?

← →
ORMADA © (2004-02-09 11:56) [2]

как ?

← →
Digitman © (2004-02-09 12:04) [3]

> как ?

чего "как" ?
выгружал ты с пом-ю TJPEGImage в формате jpeg, значит и загружать то что ранее выгрузил следует в TJPEGImage, а не в TBitmap

← →
ORMADA © (2004-02-09 12:09) [4]

пробовал так грузить
TImage(TestImage).Picture.Graphic.LoadFromStream(filestream);
не идёт пишет access violation......

← →
alex_*** © (2004-02-09 13:47) [5]

TImage.Picture.Assign(jpeg);

var Jpeg: TJPEGImage;

Jpeg.LoadFromStream(filestream); здеся всё ок
TestImage.Picture.Graphic.Assign(jpeg);но тут ошибка вылетает типа виолатион
пробовал так TestImage.Picture.Assign(jpeg); не канает
Может стоит перести при загрузке из jpg>bitmap и потом рабоатть как с битмапом ?
Кто знает как это можно сделать ?

FOTO: TMemoryStream; .. .. try if FOTO.Size>0 then Begin jpg := TJPEGImage.Create; FOTO.Seek(0,soFromBeginning); jpg.LoadFromStream(FOTO); Image1.Picture.Assign(jpg); end; CurrentDataSet.Refresh; CurrentDataSet.Locate("ID",PID_Employe,[]); finally jpg.Free(); jpg := nil; end;

2 alex_*** Рулез СПАСИБО!

TStream Найти похожие ветки