Чёрное:=CoolFunc(Белое); // у кого есть алгоритм?

← →
Chlavik (2003-09-30 19:50) [0]

Ну еще вопросик.. Как инвертировать цвет кроме Canvas.CopyMode:=cmDstInvert; (только это я знаю :) ). Вот что бы у меня есть один TColor и получить противоположный ...?

← →
Mihey (2003-09-30 20:04) [1]

Тута было дело:
http://delphimaster.net/view/1-1064744036/

← →
Rem (2003-09-30 20:07) [2]

InverseColor := not Color

← →
miek (2003-09-30 20:23) [3]

InvertRect

← →
misterix (2003-10-06 18:21) [4]

Я, все же, предлагаю сделать так:

Color := Integer(Color) xor $00FFFFFF;

Работает, как стандартное инвертирование.

← →
Urvin (2003-10-06 18:36) [5]

Как алгоритм: [по каждому каналу] из 255 вычесть значение этого канала. Потом -> RGB(R,G,B)

← →
HolACost! (2003-10-06 20:59) [6]

misterix (06.10.03 18:21) [4]
К интегер приводить нет необходимости!

Urvin © (06.10.03 18:36) [5]
Нерационально, но понятно...

← →
misterix (2003-10-07 11:56) [7]

2HolACost

Это у меня Дельфийская привычка. Все приводить :)))

Integer := Pointer(Integer(Pointer)+32)^;

:)))))

Чёрное:=CoolFunc(Белое); // у кого есть алгоритм? Найти похожие ветки