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

Вниз

Наложить одну картинку на другую   Найти похожие ветки 

 
Бархатный   (2003-07-24 17:39) [0]

Мастера, вот такой вопрос.
Нужно одну картинку наложить на другую. Если пользоваться методом Draw объекта Canvas, то верхняя картинка затирает нижнюю, а нужно, чтобы нижнее изображение (т.е. то, что от него остается) было видимо.


 
[lamer]Barmaglot   (2003-07-24 17:44) [1]

CopyRect ?


 
Бархатный   (2003-07-24 18:05) [2]

Картинки одинакового размера. Нужно, чтобы верхняя была как бы прозрачной, что ли.


 
Rouse_   (2003-07-24 18:28) [3]

Если имеется ввиду функция - то универсальной нет, все делается ручками, ScanLine, BitBlt и т.д.

Делаю успехов


 
AlexT1000   (2003-07-24 19:29) [4]

Формула прозрачности для двух цветов C1 C2
C = C1 + (C2 - C1) * A / 255;
A - коэффициент прозрачнисти C2. диапазон 0 - 255
0 - полностью прозрачный
255- полностью не прозрачный


 
Бархатный   (2003-07-24 19:35) [5]

Я делаю так:

MyBitmap2.Transparent := True;
MyBitmap2.TransparentColor := MyBitmap2.Canvas.Pixels[2, 2];
MyBitmap2.TransparentMode := tmAuto;
( 0, 0, MyBitmap2) Я делаю так:

MyBitmap2.Transparent := True;
MyBitmap2.TransparentColor := MyBitmap2.Canvas.Pixels[2, 2];
MyBitmap2.TransparentMode := tmAuto;
MyBitmap.Canvas.Draw(0, 0, MyBitmap2);

Не помогает однако :(


 
Бархатный   (2003-07-24 19:39) [6]

MyBitmap2 затирает MyBitmap.


 
Fenik   (2003-07-24 22:43) [7]

http://delphibase.endimus.com/?action=viewfunc&topic=mediaimg&id=10300


 
Бархатный   (2003-07-24 23:38) [8]

Ну Fenik, ты конкретно рулишь в этом! Фул респект.


 
miek   (2003-07-25 17:09) [9]

Есть такая процедура в WinAPI - AlphaBlend



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

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

Наверх




Память: 0.45 MB
Время: 0.011 c
3-65754
ddenis
2003-10-31 10:34
2003.11.20
Обсуждение закрыто - почему?


3-65701
SasaR
2003-11-03 10:24
2003.11.20
Максимальное количество столбцов - ?


3-65783
IGORYOK
2003-10-29 23:53
2003.11.20
Никто не слышал как в Дельфи менять местами записи ADO-таблицы


1-65871
IrviS
2003-11-11 16:17
2003.11.20
SaveToClipBoardFormat


6-66047
HimA
2003-09-22 13:58
2003.11.20
IP-адрес





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский