draw-rounded-rectangle

Draws a rectangle with rounded corners. The current pen is used for the outline and the current brush for filling the shape.

If both the pen and brush are non-transparent, the rectangle is filled with the brush before the outline is drawn with the pen. The filling and outline meet so that no space is left between them, but the precise overlap between the filling and outline is platform- and size-specific. Thus, the regions drawn by the brush and pen may partially overlap.

• (send a-dc draw-rounded-rectangle x y width height radius) -> void
      x : real number
      y : real number
      width : non-negative real number
      height : non-negative real number
      radius = 20 : real number

  Draws a rectangle with the given top-left corner, and with the given size. The corners are quarter-circles using the given radius.

  If radius is positive, the value is used as the radius of the rounded corner. If radius is negative, the absolute value is used as the the proportion of the smallest dimension of the rectangle. If radius is more than half of width or height, the resulting image is undefined.

  Restrictions on the magnitude of drawing coordinates are described with dc<%>.