|
@@ -333,8 +333,10 @@ begin
|
|
BB.Box.BottomRight.OffSet(-HalfWidth,-HalfWidth);
|
|
BB.Box.BottomRight.OffSet(-HalfWidth,-HalfWidth);
|
|
For C in TFresnelCSSCorner do
|
|
For C in TFresnelCSSCorner do
|
|
begin
|
|
begin
|
|
- BB.Radii[C].X:=BB.Radii[C].X-HalfWidth;
|
|
|
|
- BB.Radii[C].Y:=BB.Radii[C].Y-HalfWidth;
|
|
|
|
|
|
+ if BB.Radii[C].X>=HalfWidth then
|
|
|
|
+ BB.Radii[C].X:=BB.Radii[C].X-HalfWidth;
|
|
|
|
+ if BB.Radii[C].Y>=HalfWidth then
|
|
|
|
+ BB.Radii[C].Y:=BB.Radii[C].Y-HalfWidth;
|
|
end
|
|
end
|
|
end;
|
|
end;
|
|
RoundRect(Params.Color[Low(TFresnelCSSSide)],BB,False);
|
|
RoundRect(Params.Color[Low(TFresnelCSSSide)],BB,False);
|