Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.024 c
14-1090495921
ИМХО
2004-07-22 15:32
2004.08.08
Пару слов о Delphi 8


1-1090507594
Sergeevich
2004-07-22 18:46
2004.08.08
Посылка сообщений в поток


3-1089537747
zarti
2004-07-11 13:22
2004.08.08
Проблема с автоматической вставкой значения первичного ключа


14-1090133295
DelphiNew
2004-07-18 10:48
2004.08.08
День программиста


14-1090735169
GrayFace
2004-07-25 09:59
2004.08.08
Лучший хостинг