Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2012.02.05;
Скачать: CL | DM;

Вниз

Проблема с jpg.CompressionQuality   Найти похожие ветки 

 
leonidus   (2008-09-19 21:35) [0]

Нужно изменить качество JPG, делаю так:

  JPG:=TJPEGImage.Create;
  jpg.LoadFromFile("D:\1.jpg");
  jpg.CompressionQuality:=50;
  jpg.Compress;
 
  label12.Caption:=inttostr(jpg.Height);
  jpg.SaveToFile("D:\2.jpg");
  jpg.Free;  

Так вот 2.jpg всегда получается размеров 0 байт, да и значение label12.Caption равно нулю. Причем если закомментировать строчку jpg.Compress все нормально кроме того что выходной файл не изменяется т.е. получается того же размера. В чем может быть загвоздка?


 
{RASkov} ©   (2008-09-19 23:32) [1]

Попробуй перед Compress вставить DIBNeeded....


 
leonidus   (2008-09-20 00:18) [2]

удивительно но заработало, огромное спасибо, а почему так?


 
GladiatorX ©   (2008-09-24 11:56) [3]

Как говорит справка DIBNeeded - декомпрессия изображения. Т.е. прежде получаешь исходный bitmap, а затем сжимаешь его в другом качестве.



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

Текущий архив: 2012.02.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.007 c
2-1319447555
Laguna
2011-10-24 13:12
2012.02.05
Ввод в TЕdit руками или сканером штрихкода.


2-1319633128
Sanprof
2011-10-26 16:45
2012.02.05
Значение Series зная XPos (TChart)


15-1318537803
Юрий
2011-10-14 00:30
2012.02.05
С днем рождения ! 14 октября 2011 пятница


1-1284126038
Rouse_
2010-09-10 17:40
2012.02.05
Проблема с отрисовкой сабитема в ListView


15-1318859876
lextasy
2011-10-17 17:57
2012.02.05
Посоветуйте учебник по Delphi для школьника