did you mean

[pascal]
PowerDraw1.FillRect(x1,y1,x2,y2,youralpha shl 24 + yourcolor,effectalpha);
//for example blue rect
PowerDraw1.FillRect(30,30,200,200,$80FF0000,effect alpha);
[/pascal]