Вниз
Скачать: CL | DM;

Вывод картинки с полупрозрачностью   Найти похожие ветки 

← →
race1   (2005-07-18 15:22) [0]

Как нарисовать данный bitmap на какой-то канве с прозрачностью, например, 45%? Что-то никак найти не могу алгоритм смешивания цветов...


← →
Чапаев ©   (2005-07-18 15:28) [1]

> Что-то никак найти не могу алгоритм смешивания цветов
Вот проблема-то...


var
 C1,C2:TColor;
 R,G,B:Byte;
...
 C1:=BackGround.Pixels[X,Y];
 C2:=Bitmap.Pixels[X,Y];
 R:=Round(GetRValue(C2)*0.45+GetRValue(C1)*(1-0.45));
 ...
 Result.Pixels[X,Y]:=RGB(R,G,B);


← →
Магнитон Борыч   (2005-07-18 17:44) [2]

http://delphibase.spb.ru/?action=viewfunc&topic=mediaimg&id=10300



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c
1-1132308643
Andy BitOff
2005-11-18 13:10
2005.12.18
Что за ошибка: EOSError ....


14-1132737161
TUser
2005-11-23 12:12
2005.12.18
Тюнинг компьютера


2-1133523364
cor@l
2005-12-02 14:36
2005.12.18
ComboBox


2-1132729216
irishka001
2005-11-23 10:00
2005.12.18
Заблокировать запуск программы


4-1129897383
Гас
2005-10-21 16:23
2005.12.18
Как в TEdit отключить beep при выходе из этого контрола?




   Наверх