Вниз
Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.005 c
15-1319112823
Sergey Masloff
2011-10-20 16:13
2012.02.05
midaslib в новых версиях Delphi


3-1271355569
istok
2010-04-15 22:19
2012.02.05
D2010 и кодировка в Firebird...


15-1319020883
Kerk
2011-10-19 14:41
2012.02.05
WinXP: User Permissions


2-1319647986
Крококо
2011-10-26 20:53
2012.02.05
как получить адрес днс-сервера НА КОМПЬЮТЕРЕ?


4-1253690134
Tooreagen
2009-09-23 11:15
2012.02.05
Передать текст с помощью сообщений в другую программу (Delphi)




   Наверх