Размывание картинки

[DmT]

Помогите написать код на С++ или Делфи (оба борландовские) для размывания картинки TBitmap, с указанием коэфициента размывания.

[execom]

В общем-то размытие - это уменшение резкости и еконтраста между близкими точками.. надо видимо сделать что-то вроде:
берём первый пиксель первого ряда и второй пиксель... равниваем цвета... смотрим разницу... и в зависимости от степени сглаживаниа их между собой уравниваем... например у нас стоит чисто белый пиксель и чисто черный... FFFFFF 000000 делаим белый светло серым а черный светло темно серым... F0F0F0 101010 т.о. два пикселя уже сглажены... что б было поресче можно сделать через буфер чтоб брало в двухмерный динамический массив через пиксел всю картинку тогда мы просто берем за раз картинку в массив и циклом компарируем все элементы по очереди и в этом же массиве их перезаписуем на новые,... затем массив загружаем на канву.... при необходимости в файл.... Соответственно степень сглаживания будет определять относительную величину уравнивания... т.е. при минимально сглаживании будет сцета слегка изменяться а прни максимальном будут практически уравниваться.... Можно сравнивать блоками по несколько пикселей например 2*2 или 3*3 при этом можно будет в разы увеличивать предельную степень сглаживания.... Возится с кодом не буду... щаз просто лень...

[DmT]

Ну может кому не лень напишите именно код, плиззззз...

[execom]

Помогите написать код

Напишите и помогите 2 больших разници..... У нас так не любят... Где твои наработки...??? Может займусь, а может нет... Но поверь мне это не помогите, а чистейшее напишите... Ищи инфу по работе с BMP, узай работу с динамическими массивами, запускай простейший двиг... Будем искать баги... Это не сложно...

[Diller]

динамич массив можно создать так
const pi=3.14;
var
M : array of real;
n,i: integer;
begin
randomize;
razmer:=random(100);{задание размерности массива или любая зависимость по которой необходимо создавать размер массива}
SetLength(V,razmer);
loskzad:=12;
r:=2;
for i:=0 to razmer-1 do
begin
repeat
V[i]:=pi*r*r*losk;
{вывод массива в таблицу} ttable.cells[1,i+1]:=floattostr(V[i]);
losk:=Losk+1;
until losk>=loskzad;
end;
end;

[DmT]

//вот мой код. писал давненько. выдает просто черную картинку.
int pow=50;
for(int i=0;i<=Image1->Height;i++){
for(int j=0;j<=Image1->Width;j++){
Image1->Picture->Bitmap->Canvas->Pixels[i][j]=RGB(
GetRValue(Image1->Picture->Bitmap->Canvas->Pixels[i][j])*(pow/100)+GetRValue(Image1->Picture->Bitmap->Canvas->Pixels[i][j+1])*((100-pow)/100),
GetGValue(Image1->Picture->Bitmap->Canvas->Pixels[i][j])*(pow/100)+GetGValue(Image1->Picture->Bitmap->Canvas->Pixels[i][j+1])*((100-pow)/100),
GetBValue(Image1->Picture->Bitmap->Canvas->Pixels[i][j])*(pow/100)+GetBValue(Image1->Picture->Bitmap->Canvas->Pixels[i][j+1])*((100-pow)/100));
}
}

[JTG]

Быстрее будет прогуглить на тему gaussian blur delphi

[mihali4]

См. в общем разделе тему "Процедуры по обработке изображений"