BitBlt прозрачное рисование - Общие вопросы Delphi

Alex Cones · 29.06.2010, 16:15

Есть например картинка облака и картинка НЛО на сером\белом\любом одноцветном фоне. Как с помощь. BitBlt нарисовать НЛО на облаке без фона?
Слышал что-то про TransparentBlt. Оно? Если да, як его юзать?

eoln · 29.06.2010, 18:22

Оно самое - копирует часть с рабочего стола.

Код:

TransparentBlt(form1.Canvas.Handle, 0, 0, 100, 100,//куда копировать и координаты
  GetDC(0), 0, 0, 100, 100,//откуда копировать и координаты
  GetSysColor(COLOR_3DFACE))

GetSysColor(COLOR_3DFACE) - цвет фона
Есть ещё StretchBlt с вариантами прорисовки ну и TransparentStretchBlt из Graphics.pas в котором последний вариант присутствует

Alex Cones · 29.06.2010, 19:38

Все, разобрался, спасибо.

Примечание:

В Lazarus`е нет TransparentBlt его нужно отдельно экспортировать самому.

Теги для будущего поиска этой проблемы:
Нет TransparentBlt
Lazarus TransparentBlt
Undeclared Identifier TransparentBlt

29.06.2010, 16:15	#1
Alex Cones Trust no one. Старожил Регистрация: 07.04.2009 Сообщений: 6,526	BitBlt прозрачное рисование Есть например картинка облака и картинка НЛО на сером\белом\любом одноцветном фоне. Как с помощь. BitBlt нарисовать НЛО на облаке без фона? Слышал что-то про TransparentBlt. Оно? Если да, як его юзать? SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА. МОЙ БЛОГ GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ Последний раз редактировалось Alex Cones; 29.06.2010 в 16:19.

29.06.2010, 18:22	#2
eoln Старожил Регистрация: 26.04.2008 Сообщений: 2,645	Оно самое - копирует часть с рабочего стола. Код: `TransparentBlt(form1.Canvas.Handle, 0, 0, 100, 100,//куда копировать и координаты GetDC(0), 0, 0, 100, 100,//откуда копировать и координаты GetSysColor(COLOR_3DFACE))` GetSysColor(COLOR_3DFACE) - цвет фона Есть ещё StretchBlt с вариантами прорисовки ну и TransparentStretchBlt из Graphics.pas в котором последний вариант присутствует

29.06.2010, 19:38	#3
Alex Cones Trust no one. Старожил Регистрация: 07.04.2009 Сообщений: 6,526	Все, разобрался, спасибо. Примечание: В Lazarus`е нет TransparentBlt его нужно отдельно экспортировать самому. Теги для будущего поиска этой проблемы: Нет TransparentBlt Lazarus TransparentBlt Undeclared Identifier TransparentBlt SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА. МОЙ БЛОГ GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ Последний раз редактировалось Alex Cones; 29.06.2010 в 20:10.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
BitBlt, вывод изображения	zotox	Win Api	5	22.04.2010 21:43
BitBlt из памяти на экран	Марин	Win Api	6	25.01.2010 00:50
BitBlt	ZotaC	Gamedev - cоздание игр: Unity, OpenGL, DirectX	14	16.01.2010 19:04
Прозрачное окно	Bigtyoma	Общие вопросы Delphi	2	27.09.2008 19:05