Create a point
Source position: types.pp line 333
function Point(
x: Integer;
y: Integer
):TPoint;
Point returns a TPoint structure with the given position (X, Y).
Rect
Create a rectangle record
PtInRect
Check whether a point is inside a rectangle.