JPEG

← →
Ezorcist (2006-05-01 14:13) [0]

1 Как перегнать из bmp в jpeg c указанием качества в %

2 Почему в Image2 не появляется картинка? (в image1 есть bmp картинка)

Var M:TMemoryStream;
begin
M:=TMemoryStream.Create;
Image1.Picture.Bitmap.SaveToStream(M);
Image2.Picture.Bitmap.LoadFromStream(M);

← →
Virgo_Style © (2006-05-01 14:26) [1]

1. TJpegImage, afair, имеет свойство, отражающее качество.

2. попробуй между Save и Load : M.Seek(0, soFromBeginning);

← →
Ezorcist (2006-05-01 14:42) [2]

Можно с Jpeg-ом пример?

TJPEGImage подробнейшая справка с примерами.

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