| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
PBitMap --> PJpeg [Delphi, Windows]
Delpher_Gray © (2004-03-05 19:17:00)Есть один PBitMap с загруженным изолбражением, и PJpeg
Как перенести изображение из BitMap'а в Jpeg ?
Заранее благодарен !
Dimaxx (2004-03-05 22:03:00) [1]2 puky: А curentFileSize := st.Size; не пробовал? :-)
puky (2004-03-05 20:33:00) [2]
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;
| |
