绘制抗锯齿形状

Question

我尝试通过提供抗锯齿来改进我在项目中所做的一些绘图。我正在使用Graphics32库而不是标准的delphi Canvas函数来玩一个简单的项目。我正在测试简单的形状，并注意到模糊的影响，并想知道它是否可以修复。

procedure TForm1.FormPaint(Sender: TObject);
var
    Points : TArrayOfFixedPoint;
    ar: array [0 .. 6] of Tpoint;
begin
    // Antialiased Triangle
    SetLength(Points, 3);
    Points[0] := FixedPoint(20, 20);
    Points[1] := FixedPoint(20 + 100, 20 + 20);
    Points[2] := FixedPoint(20, 20 + 20);
    PolygonFS(self.mBitmap, FixedPointToFloatPoint(Points), clYellow32, pfAlternate, nil); // Draw Filled Polygon
    PolylineFS(self.mBitmap, FixedPointToFloatPoint(Points), clBlack32, true, 1); // Draw Outline

    self.mBitmap.DrawTo(self.Canvas.Handle, 0, 0);

    // Normal Triangle
    ar[0] := point(20, 150);
    ar[1] := point(20 + 100, 150 + 20);
    ar[2] := point(20, 150 + 20);
    ar[3] := point(20, 150);
    self.Canvas.Brush.Color := clYellow;
    self.Canvas.Polygon(slice(ar, 3));
end;

抗锯齿三角形具有更平滑的斜边，但两条直线看起来像是模糊的，这是有道理的，因为它是抗锯齿的。有没有办法在垂直和水平线混合的同时获得两个世界的最佳效果，同时平滑斜边？

修改 我使用的Graphic32版本是Official Github Fork的主分支的顶部，因为上一版本从2012年开始显示为1.9.1。