IsPointInRect

function IsPointInRect(

  const AP: TPoint;

  const A1: TPoint;

  const A2: TPoint

):Boolean; overload;

function IsPointInRect(

  const AP: TPoint;

  const AR: TRect

):Boolean; overload;