![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Переконвертировать JPEG [D7, WinXP]
Lesar © (2006-01-30 21:11:00)Здравствуйте ,подскажите, как переконвертировать картинку в формате JPEG. Делаю следующим образом:
var
j: TJpegImage
begin
j:=TJpegImage.Create;
j.LoadFromFile('c:\1.jpg');
j.CompressionQuality:=70;
j.Compress;
j.SaveToFile('c:\2.jpg');
j.Free;
end;
Файл на выходе выходит пустой(0 байт), при чем, если убрать строки
j.CompressionQuality:=70;
j.Compress;
то файл вполне нормально копируется... Зараннее спасибо
0bsid (2006-01-31 18:54:00) [1]всех смущает, а че поделать, перепаковка всётаки
Lesar (2006-01-31 18:14:00) [2]Благодарю ,помогло. Вот только скорость работы слегка смущает...
Sapersky (2006-01-31 14:48:00) [3]После LoadFromFile распаковать jpeg в bmp: j.DIBNeeded;
а потом уже запаковывать по новой.