С alphablend можно накладывать через GDI.
Так я и имел ввиду GDI, на битмап сверху накладываем другой битмап с прозрачностью.
]]>Очень жирный шрифт, ничего на русском, нет ссылок.
Шрифт жирным делает элемент цитирования, документация msdn действительно нерусская, но ссылка на нее оставлена.
Если же у вас личные обиды за конкретную критику, то и выяснять надо было там или в личке.
Со своей стороны сплевывать просить не собираюсь, это на ваше усмотрение.
This parameter is ignored if the bitmap is totally opaque.
setbatchlines -1
File = C:\Untitled-1.jpg
a := a_tickcount
loop 1000
{
Gdip_Startup()
pBitmapFile := Gdip_CreateBitmapFromFile(File)
Gdip_GetImageDimensions(pBitmapFile, W, H)
pBitmap := Gdip_CreateBitmap(W, H)
G := Gdip_GraphicsFromImage(pBitmap)
pBrush := Gdip_BrushCreateSolid(0x88FBD986)
Gdip_FillRoundedRectangle(G, pBrush, 0, 0, W, H, 0)
Gdip_DeleteBrush(pBrush)
Matrix = 0.5
Gdip_DrawImage(G, pBitmapFile, 0, 0, W, H, 0, 0, W, H, Matrix)
Gui, -Caption +E0x80000 +HWNDhGui +AlwaysOnTop +ToolWindow
Gui, Show, Na
hDCBuf := CreateCompatibleDC()
hBitmap := Gdip_CreateHBITMAPFromBitmap(pBitmap, 0x00000000)
SelectObject(hDCBuf, hBitmap)
UpdateLayeredWindow(hGui, hDCBuf, 0, 0, W, H)
Gdip_SaveBitmapToFile(pBitmap, "FinalImage.png")
}
time := a_tickcount - a
a := a_tickcount
loop 1000
{
Gdip_Startup()
pBitmap := Gdip_CreateBitmapFromFile(File)
Gdip_GetImageDimensions(pBitmap, W, H)
hBitmap := CreateDIBSection(W, H)
hDC := CreateCompatibleDC()
SelectObject(hDC, hBitmap)
G := Gdip_GraphicsFromHDC(hDC)
pBrush := Gdip_BrushCreateSolid(0x88FBD986)
Gdip_FillRoundedRectangle(G, pBrush, 0, 0, W, H, 0)
Gdip_DeleteBrush(pBrush)
Matrix = 0.5
Gdip_DrawImage(G, pBitmap, 0, 0, W, H, 0, 0, W, H, Matrix)
Gui, -Caption +E0x80000 +HWNDhGui +AlwaysOnTop +ToolWindow +OwnDialogs +E0x08000000
Gui, Show, Na
UpdateLayeredWindow(hGui, hDC, 0, 0, W, H)
VarSetCapacity(dib, 104, 0)
DllCall("GetObject", Ptr, hBitmap, "int", A_PtrSize = 8 ? 104 : 84, Ptr, &dib)
Stride := NumGet(dib, 12, "Int")
Bits := NumGet(dib, 20 + (A_PtrSize = 8 ? 4 : 0))
DllCall("Gdiplus.dll\GdipCreateBitmapFromScan0", "uint", W, "uint", H, "uint", Stride, "uint", 0x26200A, "ptr", Bits, "ptr*", pBitmap2)
Gdip_SaveBitmapToFile(pBitmap2, "FinalImage.png")
}
msgbox % time "`n" a_tickcount - a