请教GdiTransparentBlt
请教这个API的用法,我在以前的资料找不到介绍,谢谢了,最好能有实例
[解决办法]
Option Explicit'将图像的指定颜色替换成透明颜色。Private Declare Function GdiTransparentBlt Lib "gdi32" (ByVal hdc1 As Long, ByVal X1 As Long, ByVal Y1 As Long, ByVal W1 As Long, ByVal H1 As Long, ByVal Hdc2 As Long, ByVal X2 As Long, ByVal Y2 As Long, ByVal W2 As Long, ByVal H2 As Long, ByVal Color As Long) As LongPrivate Sub Command1_Click()'第一个参数为目标图像存储控件的DC,2和3参数为目标控件的起始点坐标 4和5为要存储的大小 第6个参数为原始图像控件的DC,7和8同2和3,9和10同4和5 第11个参数为要改变的颜色值。GdiTransparentBlt Picture2.hDC, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, Picture1.hDC, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, RGB(255, 0, 0)Me.RefreshEnd SubPrivate Sub Form_Load()Picture1.ScaleMode = 3End Sub