Source position: JPP.Common.Procs.pas line 51
procedure DrawRectRightBorder(
Canvas: TCanvas;
Rect: TRect;
Color: TColor;
PenWidth: Integer;
PenStyle: TPenStyle = psSolid;
ExtraSpace: Integer = 0
);