Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Инверсный цвет

Kozhanov © (2002-02-07 13:30:00)
Господа, подскажите как лучше написать функцию получения
инверсного цвета.

Что-то типа :
function GetInvertColor(ASrcColor : TColor) : TColor;
begin
//.....................
end;

Mbo (2002-02-08 07:05:00) [1]
Верно. Мудро.

DK (2002-02-08 03:16:00) [2]
Result:=SrcColor xor$00FFFFFF;

Kozhanov (2002-02-07 14:14:00) [3]
> MBo
Круто !
Спасибо за разъяснения !!
Ваш совет мне был очень кстати !!!

MBo (2002-02-07 14:11:00) [4]
$00FFFFFF -в шестнадцатиричном представлении 2^24-1
(в двоично виде 8 нулей, 24 единицы)

MBo (2002-02-07 14:07:00) [5]
цвет - число Integer (Longint), в котором первый байт нам не нужен, а остальные - R,G,B
not инвертирует биты, например R=240 становится 15, а
and сбрасывает первый байт в 0, не влияя на другие

Kozhanov (2002-02-07 14:04:00) [6]
> MBo
Я серьёзно MBo, что такое $00FFFFFF ???

Андрей Сенченко (2002-02-07 14:03:00) [7]
>> MBo © (07.02.02 14:00)
>> расшифровал. а с @ тоже красиво ;)

Кстати, на самом деле же не все поймут. Растолковал бы. Коротенько.

MBo (2002-02-07 14:00:00) [8]
расшифровал. а с @ тоже красиво ;)

Kozhanov (2002-02-07 13:59:00) [9]
> MBo
И мне тоже расшифруй пожалуйста...

Андрей Сенченко (2002-02-07 13:57:00) [10]
> MBo © (07.02.02 13:53)

Как там в фильме ? Люблю смотреть как Ты колдуешь :) Расшифруй пожалуйста @00FFFFFF, не дай помереть в неведении :)

MBo (2002-02-07 13:55:00) [11]
>@00FFFFFF $00FFFFFF, конечно

MBo (2002-02-07 13:53:00) [12]
Result:=@00FFFFFF and (not ASrcColor);

Андрей Сенченко (2002-02-07 13:52:00) [13]
Мысль не совсем закончил ... Соответственно для примера простая инверсия:
r,g,b : integer; realColor := RGB(r,g,b); invertColor := RGB(255-r,255-g,255-b);

Kozhanov (2002-02-07 13:51:00) [14]
> Андрей Сенченко
Меня интересует инверсия цвета как такогого.
Например задаём цвет clRed получаем инверсный ему цвет.
Какие будут предложения ???

Андрей Сенченко (2002-02-07 13:43:00) [15]
RGB палитра - это смесь трех цветов по яркости
R- red от 0 до 255
G- green от 0 до 255
B- blue от 0 до 255

От этого и танцуй. Какая инверсия Тебя интересует ?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »