Source position: kgraphics.pas line 739
procedure FillAroundRect(
ACanvas: TCanvas;
const Boundary: TRect;
const Interior: TRect;
BackColor: TColor
);