Delphi - Alpha Blending

Hola a todos. ¿Alguien me podría decir como se puede implementar el algoritmo de alpha blending en dos bitmaps?

Digamos que tengo esto:

nivel_alpha_blending := 128;
bitmap1.canvas.pixels[i,j] := bitmap2.canvas.pixels[i,j] {operacion} bitmap3.canvas.pixels[i,j];

¿Cuál sería la operación a seguir para que en el bitmap1 estuviera un mezcla de las dos imágenes?

Muchas gracias.