[Tech N9ne]

Сообщение от lmikle

Так сойдет?

Код:

function GetRectByCoord(x1,y1,x2,y2 : Integer) : TRect;
begin
  Result.Left := Min(x1,x2);
  Result.Right := Max(x1,x2);
  Result.Top := Min(y1,y2);
  Result.Bottom := Max(y1,y2);
end;

А всё понял) загуглил, понял что нужно в uses math
Спасибо тебе большое, серьезно)) огромное просто!