Mi Builder no tiene la función PtInRect pero la puedes definir así:
Código PHP:
bool PtInRect(const TRect Rect, const TPoint point)
{
return point.x >= Rect.left && point.x < Rect.right
&& point.y >= Rect.top && point.y < Rect.bottom;
}
De esta forma, la llamada sería como esta:
Código PHP:
if(PtInRect(Form1->GetClientRect(), Point))
Saludos.