Функции и процедуры управления мышью

Функция FindVCLWindow( const Pos: TPoint ): TWinControl;

Функция возвращает оконное средство управления для местоположения, определенного параметром Pos. Если для данного местоположения нет оконных средств управления, то функция возвращает nil.

Функция GetCaptureControl: TControl;

Функция возвращает средство управления класса TControl, которое получает в текущий момент все сообщения от мыши.

Функция SetCaptureControl( Control: TControl );

Функция передает управление мышью средству управления, определенному в параметре Control. Данное средство управления будет получать все сообщения от мыши, пока управление мышью не будет передано другому средству управления с помощью функции SetCaptureControl или функцией ReleaseCapture Windows API.

Взято с https://atrussk.ru/delphi/