Alpha Blending

[bernhard_LA]

unter VCL haben wir Lösungen wie unten, muss ich in FMX auch so kodieren ?

Code:

Function AlphaBlend2BMPs (  backbmp , frontbmp : TBitmap;  TransparencyColor : TByte;  Overblend : Byte )  : TBitmap ;
begin
     ///

     if not GleicheBMPSize then exit; 


     //  über alle Pixel 

     
    result_pixel [x,y] :=     ( backbmp_pixel[x,y]  -   frontbmp_pixel[x,y] ) Overblend / 100   + Front_pixel[x,y]
     
    

end

;