Почему растет объем картинки?

← →
Condor © (2004-01-04 16:11) [0]

Здравствуйте!
У меня проблема: считываю картинку из TFileStream"а и у нее почему-то увеличивается объем;

var
Pic:TJpegImage;
Stream:TFileStream;
Size:Integer;//размер картинки;
Pos:integer;//текущая позиция
begin
//Открываю стрим с картинкой..
Stream.read(Size,sizeof(integer));
Pos:=Stream.Pos;
Pic:=TJpegImage.Create;
Pic.LoadFromStream(Stream);
Pic.SaveToFile("С:\pic.jpg");
Stream.Seek(Pos+size,soFromBeginning);
// и т.д загружаю картинки..

Когда я смотрю значение Size оно 1000, а размер картинки pic.jpg
- 50000 (ну и соответственно если в стрим сохранять такое же большое). После того как я несколько раз загружаю-сохраняю одни и те же картинки, размер стрима вырастает в сотни раз.Почему так?

← →
wnew © (2004-01-04 16:52) [1]

property CompressionQuality: TJPEGQualityRange;

Но нужно учесть, что JPG файлы с каждым новым сохранением теряют качество изображения. Поэтому лучше все манипуляции с картинкой производить с BMP, а потом сохранять в JPG.

Не помогает: ставлю любое значение - размер один и тот же..

Почему растет объем картинки? Найти похожие ветки