Скачать: CL | DM;

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);

---

← →
ORMADA ©   (2004-02-10 11:37) [6]

var Jpeg: TJPEGImage;

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

---

← →
alex_*** ©   (2004-02-10 11:42) [7]



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;


---

← →
ORMADA ©   (2004-02-10 11:56) [8]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.018 c