Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.05.2017, 18:50   #11
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,285
По умолчанию

К посту выше от Cuprum5.
Например, смешивание с фоном формы:
Код:
function mix(a, b: tcolor; p: double): tcolor;
begin
  result := rgb(Round(GetRValue(a) * p + GetRValue(b) * (1 - p)),
    Round(GetGValue(a) * p + GetGValue(b) * (1 - p)),
    Round(GetBValue(a) * p + GetBValue(b) * (1 - p)));
end;

Image1.Canvas.Pen.Color := mix(rgb(k * r, k * g, k * b),
      ColorToRGB(Form1.Color), p);
И переменную p увеличивать от 0 до 1.
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
BDA на форуме Ответить с цитированием
Старый 21.05.2017, 13:59   #12
Коккс
Пользователь
 
Аватар для Коккс
 
Регистрация: 07.11.2013
Сообщений: 22
По умолчанию

Всем спасибо! Разобралась!!!
Коккс вне форума Ответить с цитированием
Старый 08.10.2017, 14:09   #13
dummy_user
Форумчанин
 
Аватар для dummy_user
 
Регистрация: 02.03.2013
Сообщений: 109
По умолчанию

Функция AlphaBlend() позволяет выводить битмапы с полупрозрачностью.
dummy_user вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Плавное появление картинки sorokolit Общие вопросы Delphi 1 22.01.2015 17:04
плавное появление изображения RevenGGe Общие вопросы Delphi 3 13.04.2013 17:46
плавное появление/исчезновение объекта TImage Хамяг Общие вопросы Delphi 2 04.12.2011 01:14
Плавное появление картинки при наведении мыши на ссылку CodeNOT JavaScript, Ajax 7 28.04.2011 17:15
Плавное появление формы HAMMAN Общие вопросы Delphi 3 15.05.2008 14:20