VB.NET
　Rectangle.Contains メソッド (Point)
　Function Contains(Point) As Boolean
　指定した点が Rectangle 構造体に含まれているかどうかを判断します。

Delphi
　function PtInRect(const Rect: TRect; const P: TPoint): Boolean;
　PtInRect 関数は，指定された点が指定された矩形の内側にあるかどうかを示します。

Delphiって古臭い上にコードが汚いね。見ていて吐き気がしてくるよ。