Преобразовать BMP в JPEG, сжать и записать в TMemoryStream

← →
user99834 (2010-03-17 17:25) [0]

Здравствуйте, хотелось бы получить ответ на вопрос - что-то я, похоже, делаю неправильно.

bm:=TBitMap.Create; bm.LoadFromFile("1.bmp"); jpgCurrent:=TJpegImage.Create; jpgCurrent.Assign(bm); jpgCurrent.CompressionQuality:=10; jpgCurrent.DIBNeeded; jpgCurrent.Compress; jpgCurrent.SaveToFile("1.jpg"); //для проверки сохраняю в файл

Не получается, вылетает Access Violation

← →
{RASkov} © (2010-03-17 17:58) [1]

> [0] user99834 (17.03.10 17:25)

На какой строке АВ?

← →
DVM © (2010-03-17 18:23) [2]

> user99834 (17.03.10 17:25)

> Не получается, вылетает Access Violation

В этом коде нет ошибки. Ошибка в другом месте.

← →
user99834 (2010-03-17 18:29) [3]

Мда... Проблема в том, что этот код и есть собственно весь. Хорошо, а как кроме такого способа можно сделать указанное?

← →
user99834 (2010-03-17 18:31) [4]

Ан нет. Влияет на это следующее:

jpgCurrent.Performance := jpBestSpeed;

Без этого кода все работает. Спасибо всем.

← →
Leonid Troyanovsky © (2010-03-17 18:39) [5]

> user99834 (17.03.10 18:31) [4]

> jpgCurrent.Performance := jpBestSpeed;
>
> Без этого кода все работает.

Не верю. (c)

--
Regards, LVT.

← →
яяя (2010-03-17 19:39) [6]

>> TJpegImage
Вообще та еще дрянь. Глючная по самое нихочу. Особенно все что связано с компресией и стреамами...

Ни на что кроме чтения и записи файла не пригодная.

Лучше уж битмап зелибом жать

← →
яяя (2010-03-17 19:39) [7]

Или искать менее глючный аналог

← →
Rouse_ © (2010-03-17 20:39) [8]

> Вообще та еще дрянь. Глючная по самое нихочу.

Поподробнее можно?

> Лучше уж битмап зелибом жать

intel jpeg library

вот еще такой вариант нашел недавно

http://blog.synopse.info/post/2010/03/14/Fast-JPEG-decoder-using-SSE/SSE2

> Rouse_ © (17.03.10 20:39) [8]
>
>
> > Вообще та еще дрянь. Глючная по самое нихочу.
>
> Поподробнее можно?

например в исходнике jpeg в коде есть строки явно обращающиеся к нулевой и первой строке пикселов. Отсюда jpeg в дельфи не везде может быть высотой в 1 пиксель :)

> antonn © (18.03.10 01:01) [10]
>
>
> > Rouse_ © (17.03.10 20:39) [8]
> >
> >
> > > Вообще та еще дрянь. Глючная по самое нихочу.
> >
> > Поподробнее можно?
>
> например в исходнике jpeg в коде есть строки

А привести сами строки с комментариями лень?

поиск в руки, я тему тут создавал

Преобразовать BMP в JPEG, сжать и записать в TMemoryStream Найти похожие ветки