[TidalAeon]

Делая лабу по операционным системам наткнулся на такую проблему.
В лабе присутствует регион, созданный Elli:=CreateEllipticRgn (...). Он меняет цвета и двигается по нажатию стрелок.
Вопрос как реализовать движение региона мышкой?
Нашел что есть такая функция GetCursorPos(Tpoint). Использовал ее, потом с помощью PtInRegion проверяю наличие Tpoint.x и Tpoint.y в регионе Elli:

Код:

if PtInRegion (Elli, Tpoint.x, Tpoint.y) then 
...
end;

И даже вставляя элементарное присваивание blue:=255 ничего не получаю.
Я так понял что я просто проверяю положение курсора? А как получить координаты, где было произведено нажатие левой кнопки мыши? А отпускание?
P.S. Лабы Windows API.