[Lazarus] KeyDown Bugs ?

Darmawan Sugiarto darmawan_sugiarto at yahoo.com
Fri Jan 30 07:23:28 CET 2009


Hi,

I have a question regarding the following function:

function PtInRect(const Rect : TRect;const p : TPoint) : Boolean;

begin
  PtInRect:=(p.y>=Rect.Top) and
            (p.y<Rect.Bottom) and
            (p.x>=Rect.Left) and
            (p.x<Rect.Right);
end;

Is there a reason why the top/left sides are included (>=), and the
left/bottom sides are not included ? I would expect them to be included as well.

Michael.



More information about the Lazarus mailing list