ソースを参照

fix texture average opacity

johann 5 年 前
コミット
b9cc21213d
1 ファイル変更1 行追加0 行削除
  1. 1 0
      lazpaintcontrols/lcvectorialfill.pas

+ 1 - 0
lazpaintcontrols/lcvectorialfill.pas

@@ -440,6 +440,7 @@ begin
         FTextureAverageColorComputed := true;
       end;
       result := FTextureAverageColor;
+      result.alpha := BGRABlend.ApplyOpacity(result.alpha, TextureOpacity);
     end
   else {vftSolid} result := SolidColor;
   end;