Есть функция
function PtInRect(const Rect: TRect; const P: TPoint): Boolean;
Если координаты "P" внутри "области" Rect, то функция возвращает True, иначе False. Вот и сканируй в цикле части своей области, пока функция не возвратит True. В этой части и находится точка.
|