说明：在 Wndows 显示时，有时控件左方会显示一条虚线

适用：Firemonkey Windows （Berlin 或更高版）

修正方法：

请将源码 FMX.Canvas.D2D.pas 复制到自己的工程目录里，再进行修改。

procedure TCanvasD2D.SetClipRects(const ARects: array of TRectF);...略...    for I := 0 to High(ARects) do    begin      R := ARects[I]; {
    +++>}InflateRect(R, 0.0001, 0.0001); // 加入此行代码：修正 Win 控件有虚线残影问题 by Aone 2017.05.03 if not IsScaleInteger then        R := AlignToPixel(R);      SharedFactory.CreateRectangleGeometry(D2Rect(R), ID2D1RectangleGeometry(Geoms[I]));    end;...略...end;

 

未修正：

修正后：