Source position: unit_engineering.pas line 10
function LeftRightPos(
MLoc: Point;
Box: Rect
):HorizPos;