Important: The information in this document is obsolete and should not be used for new development.
InsetRectTo shrink or expand a rectangle, use the
PROCEDURE InsetRect (VAR r:\xDDRect; dh,dv:\xDDInteger);
- The rectangle to alter.
- The horizontal distance to move the left and right sides in toward or outward from the center of the rectangle.
- The vertical distance to move the top and bottom sides in toward or outward from the center of the rectangle.
InsetRectprocedure shrinks or expands the rectangle that you specify in the
rparameter: the left and right sides are moved in by the amount you specify in the
dhparameter; the top and bottom are moved toward the center by the amount you specify in the
dvparameter. If the value you pass in
dvis negative, the appropriate pair of sides is moved outward instead of inward. The effect is to alter the size by
2*dvvertically, with the rectangle remaining centered in the same place on the coordinate plane.
If the resulting width or height becomes less than 1, the rectangle is set to the empty rectangle (0,0,0,0).