Source position: kgraphics.pas line 701
procedure DrawEdges(
Canvas: TCanvas;
const R: TRect;
HighlightColor: TColor;
ShadowColor: TColor;
Flags: Cardinal
);