Code: Select all
@DISPLAY 1, {Color=#WHITE}
SetFormStyle(#NORMAL)
SetFillStyle(#FILLCOLOR)
; black bar so that we can see alpha channel better
Box(50, 0, 300, 600, #BLACK)
Box(0, 50, 200, 50, ARGB(100, #BLUE))
SetFormStyle(#SHADOW, #RED, 10, #SHDWSOUTHEAST)
Box(0, 150, 200, 50, ARGB(100, #BLUE))
SetFormStyle(#EDGE, #GREEN, 5)
Box(0, 250, 200, 50, ARGB(100, #BLUE))
; #################################################
SetFormStyle(#NORMAL)
SetFormStyle(#ANTIALIAS) ; !!!!!!!!!!!!!!!!!!!!!!!
SetFillStyle(#FILLCOLOR)
Box(250, 50, 200, 50, ARGB(100, #BLUE))
; the following box looses the alpha channel !
SetFormStyle(#SHADOW, #RED, 10, #SHDWSOUTHEAST)
Box(250, 150, 200, 50, ARGB(100, #BLUE))
; with an additional "edge" the alpha channel is back !
SetFormStyle(#EDGE, #GREEN, 5)
Box(250, 250, 200, 50, ARGB(100, #BLUE))
WaitLeftMouse