Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Игры";
Текущий архив: 2004.11.07;
Скачать: [xml.tar.bz2];

Вниз

BitBlt и прозрачность   Найти похожие ветки 

 
BladeMaster   (2004-07-07 13:02) [0]

Вот понадобилось с помощью BitBlt вывести картинку с прозрачными участками.
Посмотрел на DelphiGFX и нашел следующее:
...
var
Wizard, WizardMask,Buffer:Tbitmap;
X,Y:integer;
...
Wizard:=Tbitmap.Create;
Wizard.Loadfromfile("spr1.bmp");
WizardMask:=Tbitmap.Create;
WizardMask.Loadfromfile("spr2.bmp");
Buffer:=Tbitmap.Create; // Копируем маску в буфер
BitBlt(Buffer.Canvas.Handle,X,Y,50,50, WizardMask.Canvas.Handle,0,0,SrcPaint);
// Копируем спрайт в буфер
BitBlt(Buffer.Canvas.Handle,X,Y,50,50, Wizard.Canvas.Handle,0,0,SrcAnd);
...
// Перемещаем буфер на форму BitBlt(Form1.Canvas.Handle,0,0,320,240,Buffer.Canvas.Handle,0,0,SrcCopy);

Так вот, если прозрачный цвет белый, то все работает. А если любой другой то этот цвет становится не прозрачным, а полупрозрачным. Как от этого избавиться?

PS
Видео: GeForce4 MX400


 
Servelat ©   (2004-07-07 23:48) [1]

Если у тебя картинка маски - монохромная, то сделай её не монохромной, а 24"битной (или столько битной, сколько и основное изображение). Должно помочь.



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

Форум: "Игры";
Текущий архив: 2004.11.07;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.034 c
14-1098200193
ZDima
2004-10-19 19:36
2004.11.07
Нахождение корня уравнения вида f(x)=0 методом интераций


1-1098686822
Last
2004-10-25 10:47
2004.11.07
Как задавить нажатие клавиши Enter?


9-1086894205
Огромное Кулясище
2004-06-10 23:03
2004.11.07
Каков OpenGL для 2D?


8-1088581377
clampo
2004-06-30 11:42
2004.11.07
grahic analyzer


4-1096816084
Teap0t
2004-10-03 19:08
2004.11.07
создаем Сервис под XP





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский