Declaration

procedure OrdCor(var x1, y1, x2, y2: Integer);

Description

Sorts x1, y1, x2, y2 so that x1, y1 is at the top-left and x2, y2 is at the bottom-right vertex of the rectangle.

Example

OrdCor(Rect.Left, Rect.Top, Rect.Right, Rect.Bottom);

---