diff --git a/fxgraphiccontrol.pas b/fxgraphiccontrol.pas index 0d0a229..e641537 100644 --- a/fxgraphiccontrol.pas +++ b/fxgraphiccontrol.pas @@ -183,7 +183,7 @@ procedure TFXGraphicControl.Colorize(Source, Dest: TBGRABitmap; c: TBGRAPixel); pdest^.red := GammaCompressionTab[((GammaExpansionTab[psource^.red]*ec.red+65535) shr 16)]; pdest^.green := GammaCompressionTab[((GammaExpansionTab[psource^.green]*ec.green+65535) shr 16)]; pdest^.blue := GammaCompressionTab[((GammaExpansionTab[psource^.blue]*ec.blue+65535) shr 16)]; - pdest^.alpha := psource^.alpha; //(pdest^.alpha*ec.alpha+255) shr 16; + pdest^.alpha := (psource^.alpha*ec.alpha+255) shr 16; inc(pdest); inc(psource); end;