Текущий архив: 2004.08.08;
Скачать: CL | DM;

Вниз

PBitMap --> PJpeg   Найти похожие ветки 

← →
Delpher_Gray ©   (2004-03-05 19:17) [0]

Есть один PBitMap с загруженным изолбражением, и PJpeg
Как перенести изображение из BitMap"а в Jpeg ?

Заранее благодарен !

---

← →
puky   (2004-03-05 20:33) [1]


 jpg2 := NewJpeg;
 jpg2.Bitmap := NewDIBBitmap(1, 1, pf24bit);
 jpg2.Bitmap.Assign( loc_bmp );
 jpg2.CompressionQuality := Quality;
 jpg2.ProgressiveDisplay := true;
 jpg2.Compress;
 
 st := NewMemoryStream;
 jpg2.SaveToStream( st );
 curentFileSize := st.Position;//размер jpeg файла
end;


---

← →
Dimaxx ©   (2004-03-05 22:03) [2]

2 puky: А curentFileSize := st.Size; не пробовал? :-)

---

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

Текущий архив: 2004.08.08;
Скачать: CL | DM;

Наверх

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