图象与指定颜色的半透明效果(100分)

速度要快！

用ScanLine

P:=Bmp.ScanLine[ALine];

P:=YourColor * (255 - BlendValue) div 255 + P * BlendValue div 255;
//注意，这里有个处理RGB分量的问题

to pihome:
我写成这样：P[x]:=(clblue * (255 - 50)) div 255 + P[x] * 50 div 255
报错：Overflow in conversion or arithmetic operation
原谅我的无知，再问有没有更好的办法。
我自己试了个办法：p[x * 3 + 2]:=clblue shl 16;
但是只能和兰色混合，其他色不行。