Работа с палитрой

← →
login2 © (2002-07-30 11:18) [0]

Подскажите, почему вот этот кусок кода по фильтрации изображения

for i:= 0 to PaletteSize-1 do
if palPalEntry[i].peRed <125 then
begin
palPalEntry[i].peRed:=0;
palPalEntry[i].peGreen:=0;
palPalEntry[i].peBlue:=0;
end
else
begin
palPalEntry[i].peRed:=255;
palPalEntry[i].peGreen:=255;
palPalEntry[i].peBlue:=255;
end;

работает также как и инверсия, вернее сказать неправильно работает инвертирование:

for i:= 0 to PaletteSize-1 do
if palPalEntry[i].peRed > 125 then
begin
palPalEntry[i].peRed:=0;
palPalEntry[i].peGreen:=0;
palPalEntry[i].peBlue:=0;
end
else
begin
palPalEntry[i].peRed:=255;
palPalEntry[i].peGreen:=255;
palPalEntry[i].peBlue:=255;
end;

← →
MBo © (2002-07-30 11:28) [1]

в чем выражается неправильная работа?
приведенный кусок успешно выполняет заданные действия. Что дальше?

← →
login2 © (2002-07-30 11:46) [2]

по каким-то причинам не изменяется само изображение,
хотя палитра изменяется, я смотрел в ACDSee.
Оба куска кода изменяют палитру, но изображение только фильтруется(темные в черное, светлое в белое) и все.

← →
MBo © (2002-07-30 11:51) [3]

>темные в черное, светлое в белое
а что нужно-то?

нужно сделать инвертирование, или ты хочешь сказать что оно у тебя работает?

Работа с палитрой Найти похожие ветки