40 / 40 / 10
Регистрация: 27.06.2008
Сообщений: 118
|
|
1 | |
Инвертация цвета TColor для Form.Canvas21.05.2009, 11:04. Показов 5060. Ответов 1
Метки нет (Все метки)
Как инвертировать цвет для канвы формы?
Я сделал вот так, но что-то мне не нравиться полученый результат - цвет не такой как бы должен быть! Код
function InvertColor(Col: TColor): TColor; begin Result:=Col xor $00FFFFFF; end; СПС! Добавлено через 23 часа 43 минуты 15 секунд Ну, что!? Ни у кого нет никаких соображений?! Ну! Люди! Посоветуйте кто чё знает!
0
|
21.05.2009, 11:04 | |
Ответы с готовыми решениями:
1
построить функцию y=kx+b (линейная функция) с помощью Vcart или canvas (form.canvas) Загрузить рисунок, используя свойство Canvas объекта Form Нужны методы для перевода TColor в TGPColor и обратно Инверсия цвета TColor |
5 / 5 / 2
Регистрация: 26.05.2007
Сообщений: 13
|
|
22.05.2009, 23:47 | 2 |
Код
function InvertColor(Col: TColor): TColor; begin Result:=ColorToRGB(Col) xor $00FFFFFF; end;
1
|
22.05.2009, 23:47 | |
22.05.2009, 23:47 | |
Помогаю со студенческими работами здесь
2
Выбор цвета для заливки canvas Прорисовка на Canvas, Form Canvas перекрытие цвета фона Неверные цвета пикселей в canvas Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |