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

Вниз

Улучшение качества картинки   Найти похожие ветки 

 
Laguna ©   (2011-11-10 17:49) [0]

Стоит задача распечатать картинку, находящуюся в Timage. Каким образом можно улучшить качество картинки перед выводом на печать, чтобы текст был более менее читабельным? Вот к примеру есть некий простенький графический редактор, в котором есть функция под названием гистограмма. Возможно ли самому реализовать такой эффект корретировки качества? На картинке показана часть изображения, присылаемая клиентами по почте.
http://s017.radikal.ru/i425/1111/7a/7b3843302e03.jpg
Как видете качество не ахти. Загружаю гистограмму, сдвигаю ползунки вправо и качество улучшается
http://s40.radikal.ru/i089/1111/07/4c25b6a1e9e4.jpg
Вот хотелось бы нечто подобное применить в своем коде. Подскажите направление где искать решение.

Подскажите направление поиска решения


 
clickmaker ©   (2011-11-10 18:00) [1]

http://www.rsdn.ru/article/Gdi/gdi11_1.xml


 
Laguna ©   (2011-11-10 19:58) [2]


> clickmaker ©   (10.11.11 18:00) [1]


Большое спасибо. Вот только Си... Но попытаюсь разобраться.


 
Омлет ©   (2011-11-10 20:12) [3]

http://en.wikipedia.org/wiki/Histogram_equalization


 
Омлет ©   (2011-11-10 20:17) [4]

тут на Delphi
http://www.efg2.com/Lab/ImageProcessing/HistoStretchGrays.htm


 
Pavia ©   (2011-11-10 20:33) [5]

http://www.efg2.com/Lab/ImageProcessing/HistoStretchGrays.htm
http://sources.ru/magazine/0805/paint.html

С гистограммами работать просто.
SetLength(a,256);
a[]:=0; обнуляем
Для всех пикселей изображения
begin
color:=Pixel(x,y); - тут предполагается что картинка серая 8 бит на пиксель.
Inc(a[color]);
end;

Теперь в "a" гистограмма.
Трансформируешь гистограмму.
Заведём массив b
SetLength(b,256);
b[i]:=i;
При трансформации гистограммы меняешь b.
Вывод делается просто

Для всех пикселей изображения
begin
color:=Pixel(x,y); - тут предполагается что картинка серая 8 бит на пиксель.
newcolor=b[color];
end;

Если будешь повышать контрастность, то совет ещё сделать умное размытие,  которое не затрагивает границы.


 
Laguna ©   (2011-11-10 20:35) [6]

>Омлет

Огромаднейшее спасибо. То что нужно. Буду разбираться.



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

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

Наверх




Память: 0.48 MB
Время: 0.01 c
2-1320786460
I
2011-11-09 00:07
2012.02.19
Компиляция в командной строке


15-1319915898
DVM
2011-10-29 23:18
2012.02.19
Забавная картинка


15-1320125891
alexdn
2011-11-01 08:38
2012.02.19
3d визуализация


6-1219582346
-=Le][=-
2008-08-24 16:52
2012.02.19
Как узнать полное имя домена?


15-1320263467
GreyWolf83
2011-11-02 22:51
2012.02.19
UTF-8 сравнение строк без учета регистра???