Delphi/Firemonkey曲线间低透明度填充失效问题求助

问题拆解 #

• 核心问题：Windows平台下，在TRectangle容器内的TPaintBox绘制两条曲线间的渐变填充完全正常，但到iOS/Android（含模拟器、实体设备）上，只要将填充透明度设为0.1、0.4这类低数值，就会出现显示异常，数据带噪声时问题更严重。

可以实现低透明度填充，给你几个可行方案： #

方案1：离屏画布分层绘制 #

绕开移动端透明渐变的渲染bug，先绘制不透明填充，再半透明叠加：

1. 创建离屏TBitmap，在上面用不透明颜色完成曲线填充区域的绘制；
2. 将该离屏画布以目标透明度叠加到TPaintBox的画布上。
   示例代码（Delphi FMX）：

procedure TForm1.PBPaint(Sender: TObject);
var
  OffscreenBmp: TBitmap;
  TargetOpacity: Single;
begin
  OffscreenBmp := TBitmap.Create;
  try
    OffscreenBmp.SetSize(PB.Width, PB.Height);
    // 第一步：在离屏画布绘制不透明的曲线填充区域
    OffscreenBmp.Canvas.BeginScene;
    // 替换为你自身的曲线填充逻辑，使用不透明颜色
    DrawCurveFill(OffscreenBmp.Canvas, TAlphaColors.Red);
    OffscreenBmp.Canvas.EndScene;

    // 第二步：按目标透明度叠加到TPaintBox
    TargetOpacity := 0.4;
    PB.Canvas.BeginScene;
    PB.Canvas.DrawBitmap(OffscreenBmp, OffscreenBmp.BoundsRect, PB.BoundsRect, TargetOpacity);
    PB.Canvas.EndScene;
  finally
    OffscreenBmp.Free;
  end;
end;

方案2：统一控制渐变画刷透明度 #

不要给渐变颜色单独设置Alpha通道，改用渐变画刷自身的Opacity属性控制整体透明度：

var
  GradientBrush: TLinearGradientBrush;
begin
  GradientBrush := TLinearGradientBrush.Create(PointF(0,0), PointF(PB.Width,0), 
    TAlphaColors.Red, TAlphaColors.Blue);
  try
    GradientBrush.Opacity := 0.4; // 统一设置透明度
    PB.Canvas.Fill.Gradient := GradientBrush;
    // 执行填充路径绘制
    PB.Canvas.FillPath(YourFillPath);
  finally
    GradientBrush.Free;
  end;
end;

方案3：临时关闭硬件加速（应急用） #

部分移动端硬件加速对透明渐变渲染存在兼容问题，可尝试关闭TPaintBox的硬件加速：

PB.StyleLookup := ''; // 重置样式禁用默认硬件加速
PB.OwnerDraw := True;

注意：此方法可能降低绘制性能，仅适合临时测试或性能要求较低的场景。

测试建议 #

• 优先测试方案1，离屏绘制兼容性最优，可有效规避移动端渲染bug；
• 使用方案2时，确保渐变的起始/结束颜色为不透明状态，避免双重透明叠加导致异常；
• 测试时覆盖噪声数据场景，验证低透明度下填充区域无异常噪点。

内容的提问来源于stack exchange，提问作者Ian