Инверсия цвета

[Dj_smart]

Доброго времени суток уважаемые программисты.
У меня вот проблема.
Значит в есть в Image рисунок bmp (8-24 бита). Но мне надо инверсировать цвет какой-нить точки. Делал так:

image1.Canvas.Pixels[n,m]:= not image1.Canvas.Pixels[n,m];

Но оно инверсирует неправильно. То есть размазня получается

Как это релизовать чтобы без размазни?

Заранее спасибо.

[delphin100]

надо написать так

image1.Canvas.Pixels[n,m]:= #FFFFFF- image1.Canvas.Pixels[n,m];

так если я ничего не перепутал

[Dj_smart]

Попробую, ели чё, отпишусь.

[Dj_smart]

Спасибо, ОНО. Тольо я FFFFFF заменил в калькуляторе на 16777215 и всё ок. +. Я даже и не додумался о такой идеи

[mutabor]

Но оно инверсирует неправильно. То есть размазня получается

Тот способ подходит, если применять его к типу byte: byte:=not byte;
Предварительно разбив цвет на RGB составляющие.

[BOBAH13]

По сути не $FFFFFF а TColor кажется там $7FFFFF. Так вот это тоже число только в 24 битах в 16 системе. Инверсия по сути, как я понимаю, допустим было 00010110 ( 1 байт - 8 бит ) стало после инверсии 11101001, думаю заметна разница Или еще вариант, но я так чисто теоретически рассуждаю, как и было сказано разбить на составляющие R G B а потом Hi(BYTE) = 255 вычесть значение составляющей. Например нассышенность красного R = 50 тогда после инверсии R = 255 - 50 = 205. А вообще если бы вы потрудились поискать в сети... 100% нашли то что вам надо

[mutabor]

Или еще вариант, но я так чисто теоретически рассуждаю, как и было сказано разбить на составляющие R G B а потом Hi(BYTE) = 255 вычесть значение составляющей. Например нассышенность красного R = 50 тогда после инверсии R = 255 - 50 = 205

Ну так это тоже самое R:=not R; R = 255 - R;
Выше привели нормальный вариант, и не надо на составляющие разбивать:
Color:=clWhite{= $FFFFFF, = 16777215} - Color;