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

Быстрый ресамплинг изображений   Найти похожие ветки 

← →
badevlad ©   (2007-03-07 11:14) [0]

Кто какие знает алгоритмы быстрого ресамплинга битмапов? Я нашел несколько довольно неплохо работающих функций, но метод Lanczos, который у меня есть, работает очень медленно и оставляет артефакты (при небольшой степени сжатия на однотонном изображении появляются слабо видимые «клеточки»). Более быстрые и менее аккуратные алгоритмы страдают артефактами еще сильнее (ярко выраженные «клеточки»). Хорошо работает только билинейный метод, но этого мало.

Кто с этим сталкивался и может подсказать безглючные и быстро работающие алгоритмы? Нужен код на Delphi, чем больше вариантов, тем лучше.

---

← →
Sapersky   (2007-03-07 14:01) [1]

Вы определитесь всё-таки, быстро нужно или качественно.
Если, например, требуется реалтайм, то вряд ли получится применить что-либо сложнее билинейной фильтрации. Хотя это зависит от размера картинок, предполагаемых системных требований и т.п.
Практически любые типы фильтров есть в FastLIB:
http://sourceforge.net/project/showfiles.php?group_id=173551
Артефактов (кроме тех, что присущи низкокачественным фильтрам) не замечал.
Если надо, у меня есть оптимизированный вариант сложных фильтров (SmoothResize), раза в 2 быстрее.

---

← →
Сотрудник деканата   (2007-03-07 17:39) [2]

> Sapersky   (07.03.07 14:01) [1]
> Если надо, у меня есть оптимизированный вариант сложных
> фильтров (SmoothResize), раза в 2 быстрее.

Очень надо! Буду благодарен, если Вы поделитесь столь ценной вещью!

---

← →
Sapersky   (2007-03-07 20:05) [3]

http://slil.ru/24043787

---

← →
Сотрудник деканата   (2007-03-07 20:58) [4]

Круто! Спасибо большое.

А вот например код

     w := pw.w;
     If ForceOneCont then begin
       Inc(zr, w shr 1); Inc(zg, w shr 1); Inc(zb, w shr 1);
.....
....
       zr := (zr + (w shr 1)) div w;
       zg := (zg + (w shr 1)) div w;
       zb := (zb + (w shr 1)) div w;


почему бы сразу не присваивать

w := pw.w shr 1  ?

Или оптимизатор в Delphi сам с этим справляется?

---

← →
Сотрудник деканата   (2007-03-07 21:00) [5]

Т.е. завести еще одну переменную

w := pw.w;
w1 := w shr 1;

и вместо w shr 1 использовать w1.

---

← →
Sapersky   (2007-03-09 12:45) [6]

Оптимизатор справляется, хотя я на это не надеялся - просто shr сравнительно быстрая операция, и влияние двух лишних команд будет заметно только на очень простом коде, но не в том нагромождении, которое имеется в DoFilter.
Кстати, ускорение в основном достигнуто именно за счёт замены деления (div) сдвигом (можно переключиться на старый метод - ForceOneCont = False и почувствовать разницу) и использованием указателя (c := @Src.Pixels24[pw.pos, x];) вместо переменной.

---

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

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



Память: 0.46 MB
Время: 0.021 c