Нужна помощь. Мне нужно определить находиться ли курсор мыши на форме в Регионе типа TRect. Использую следующий код функции, но не работает он что-то:
Код:
function CursInReg(R: TRect): Boolean;
var
CP: TPoint;
begin
GetCursorPos(CP);
if (CP.X>R.left)and(CP.X<R.Right)and(CP.Y>R.Top)and(CP.Y<R.Bottom) then Result:=True else Result:=False;
end;
Если кто-то с етим встречался, то плиз хелп!!!