Вниз
Скачать: CL | DM;

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

 
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.


 
Condor ©   (2004-01-04 17:17) [2]

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



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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.015 c
3-49404
NickNaz
2003-12-19 12:34
2004.01.16
DBGrid


1-49610
alexEagle
2004-01-06 14:33
2004.01.16
Плавающие окна в Делфи


8-49647
Delphin
2003-09-16 14:31
2004.01.16
Народ, помогите пожалуйста найти компонент dxPack первой версии (


1-49506
Эли
2004-01-02 10:42
2004.01.16
Вернуть активность собственной форме


1-49629
rolex
2004-01-04 18:40
2004.01.16
Как в ListBox1 в каждую строчку записать имена файлов, из папки F




   Наверх