Прозрачный растр

Delphi , Графика и Игры , Bitmap

Автор: Павел

Пожалуй, это самый простой способ создания прозрачного изображения. Суть его в том, что маска создается автоматически во время выполнения программы, используя значение прозрачного цвета.

MaskBitmap := TBitmap.Create;
MaskBitmap.Assign(SrcBitmap);
MaskBitmap.Mask(FColor); //прозрачный цвет
BitBlt(DestBitmap.Canvas.Handle, x, y,
  SrcBitmap.Width, SrcBitmap.Height,
  MaskBitmap.Canvas.Handle, 0, 0, SRCAND);
BitBlt(DestBitmap.Canvas.Handle, x, y,
  SrcBitmap.Width, SrcBitmap.Height,
  SrcBitmap.Canvas.Handle, 0, 0, SRCINVERT);
MaskBitmap.Free;

Статья Прозрачный растр раздела Графика и Игры Bitmap может быть полезна для разработчиков на Delphi и FreePascal.

Комментарии и вопросы

:: Главная :: Bitmap ::