Объединение картинок с созданием эффекта полупрозрачности

@Gramila · Регистрация: 07.03.2010

Студворк — интернет-сервис помощи студентам

Есть 3 Picture одинакового размера
На первом картинка
На втором программно нанесённые синие и голубые точки на белом фоне
Требуется разместить на третий Picture наложение первого и второго, то есть, взять картинку из первого Picture и поверх неё наложить синие и голубые точки из второго Picture (но белый фон нафиг не нужен).

Цель сие задумки:
Пишу прогу для расчёта радиопокрытия базовой станции сотового оператора. На первом Picture будет карта местности, на втором радиопокрытие (синие точки уверенный приём, голубые - хреновый, белый фон - вне зоны действия сети). На третьем Picture должно быть их наложение, притом чтобы покрытие саму карту не закрывало, а было полупрозрачным.

То есть, примерно так, как показано на примере в прикреплённой картинке

Подскажите, пожалуйста, как реализовать

@Vlanib · 22.04.2010, 14:20

Для этого используются функции

Visual Basic
1
2
3
Declare Function AlphaBlending Lib "msimg32.dll" Alias "AlphaBlend" (ByVal hdcDest As Long, ByVal nXOriginDest As Long, ByVal nYOriginDest As Long, ByVal nWidthDest As Long, ByVal nHeightDest As Long, ByVal hdcSrc As Long, ByVal nXOriginSrc As Long, ByVal nYOriginSrc As Long, ByVal nWidthSrc As Long, ByVal nHeightSrc As Long, ByVal BF As Long) As Long
 
Declare Function DrawTransparent Lib "msimg32.dll" Alias "TransparentBlt" (ByVal hdcDest As Long, ByVal nXOriginDest As Long, ByVal nYOriginDest As Long, ByVal nWidthDest As Long, ByVal nHeightDest As Long, ByVal hdcSrc As Long, ByVal nXOriginSrc As Long, ByVal nYOriginSrc As Long, ByVal nWidthSrc As Long, ByVal nHeightSrc As Long, ByVal crTransparent As Long) As Long

@Gramila · 22.04.2010, 15:43 **[ТС]**

Так, ну вроде как AlphaBlend подходит, вроде примерно понял как работает.
А TransparentBlt нафига? Не догоняю что эта функция делает, как раьботает и зачем она...

@Vlanib · 22.04.2010, 16:08

Ну дык устанавливает по пикселу цвет, который будет прозрачным.

@Gramila · 22.04.2010, 16:16 **[ТС]**

а можно какой-нить примерчик как работает... чтото я их не понимаю
я API практически не знаю, знаком с ними исключительно по примерам их работы и не более

Новые блоги и статьи Все статьи Все блоги /
Валидация и контроль данных табличной части документа перед записью Maks 22.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .	Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .	Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .

@Gramila 2 / 2 / 0 Регистрация: 07.03.2010 Сообщений: 6

	Объединение картинок с созданием эффекта полупрозрачности 22.04.2010, 12:38. Показов 1218. Ответов 4 Метки нет (Все метки) Есть 3 Picture одинакового размера На первом картинка На втором программно нанесённые синие и голубые точки на белом фоне Требуется разместить на третий Picture наложение первого и второго, то есть, взять картинку из первого Picture и поверх неё наложить синие и голубые точки из второго Picture (но белый фон нафиг не нужен). Цель сие задумки: Пишу прогу для расчёта радиопокрытия базовой станции сотового оператора. На первом Picture будет карта местности, на втором радиопокрытие (синие точки уверенный приём, голубые - хреновый, белый фон - вне зоны действия сети). На третьем Picture должно быть их наложение, притом чтобы покрытие саму карту не закрывало, а было полупрозрачным. То есть, примерно так, как показано на примере в прикреплённой картинке Подскажите, пожалуйста, как реализовать Миниатюры 0

@Gramila 2 / 2 / 0 Регистрация: 07.03.2010 Сообщений: 6
	22.04.2010, 15:43 [ТС]
	Так, ну вроде как AlphaBlend подходит, вроде примерно понял как работает. А TransparentBlt нафига? Не догоняю что эта функция делает, как раьботает и зачем она... 0

@Vlanib Частенько бываю 750 / 331 / 42 Регистрация: 20.06.2007 Сообщений: 854
	22.04.2010, 16:08
	Ну дык устанавливает по пикселу цвет, который будет прозрачным. 0

@Gramila 2 / 2 / 0 Регистрация: 07.03.2010 Сообщений: 6
	22.04.2010, 16:16 [ТС]
	а можно какой-нить примерчик как работает... чтото я их не понимаю я API практически не знаю, знаком с ними исключительно по примерам их работы и не более 0

Опции темы