|kerish| » 22.11.2004 (Пн) 10:39
Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
Private Const MERGEPAINT = &HBB0226
Private Const SRCAND = &H8800C6
Далее имеем 2 рисунка, например машины.
Первый оригинальный, вотрой маска (черный контур на белом фоне).
Затем вызываем BitBlt...
BitBlt ТамГдеРисуем.hDC, ПоложениеX, ПоложениеY, Ширина, Высота, ТоЧтоРисуем.hDC, 0, 0, MERGEPAINT
BitBlt ТамГдеРисуем.hDC, ПоложениеX, ПоложениеY, Ширина, Высота, ТоЧтоРисуем.hDC, 0, 0, SRCAND
Всё, у нас прозрачная машина.