[修正] Firemonkey Windows 控件有虚线残影问题
说明:在 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;
未修正:
修正后: