| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Чёрное:=CoolFunc(Белое); // у кого есть алгоритм?
Chlavik © (2003-09-30 19:50:00)
Ну еще вопросик.. Как инвертировать цвет кроме Canvas.CopyMode:=cmDstInvert; (только это я знаю :) ). Вот что бы у меня есть один TColor и получить противоположный ...?
misterix (2003-10-07 11:56:00) [1]
2HolACost
Это у меня Дельфийская привычка. Все приводить :)))
Integer := Pointer(Integer(Pointer)+32)^;
:)))))
HolACost! (2003-10-06 20:59:00) [2]
misterix (06.10.03 18:21) [4]
К интегер приводить нет необходимости!
Urvin © (06.10.03 18:36) [5]
Нерационально, но понятно...
Urvin (2003-10-06 18:36:00) [3]
Как алгоритм: [по каждому каналу] из 255 вычесть значение этого канала. Потом -> RGB(R,G,B)
misterix (2003-10-06 18:21:00) [4]
Я, все же, предлагаю сделать так:
Color := Integer(Color) xor $00FFFFFF;
Работает, как стандартное инвертирование.
miek (2003-09-30 20:23:00) [5]
InvertRect
Rem (2003-09-30 20:07:00) [6]
InverseColor := not Color
Mihey (2003-09-30 20:04:00) [7]Тута было дело:
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1064744036&n=0
| |
