On Fri, 30 Jan 2009, dmitry boyarintsev wrote:
> AFAIK, Delphi compat.Here's the delphi code from Types unit. > > function PtInRect(const Rect: TRect; const P: TPoint): Boolean; > begin > Result := (P.X >= Rect.Left) and (P.X < Rect.Right) and (P.Y >= Rect.Top) > and (P.Y < Rect.Bottom); > end; I found this out already, but why, what is the rationale ? Michael. _______________________________________________ Lazarus mailing list [email protected] http://www.lazarus.freepascal.org/mailman/listinfo/lazarus
