Форум: "Media";
Текущий архив: 2005.12.18;
Скачать: [xml.tar.bz2];
ВнизВывод картинки с полупрозрачностью Найти похожие ветки
← →
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 вся ветка
Форум: "Media";
Текущий архив: 2005.12.18;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.015 c