Source position: GIS_Polygons.pas line 109
procedure PathBuild_RoundRect(
var aPath: TPath;
const StartPoint: TGPoint;
const EndPoint: TGPoint;
RoundFactor: Integer
);