мышка в Delphi Опции

[Аня]

скажите пожалуйстя как отследить удерживание нажатой какой-нибуть кнопки мыши? т.е. если необходимо совершать какие-то действия не только при нажатии кнопки мыши, но и при её удержании?

[volvo]

Перемещение контролов мышкой во время выполнения приложения?
Для этого необходимо перехватить событие OnMouseDown, запомнив координаты x и y и захватить мышку. После этого можно будет отслеживать движение мышки при помощи события OnMouseMove, перемещая контрол пока срабатывает событие OnMouseUp. Затем надо поместить контрол на своё окончательное место и снять захват мышки.

Я думаю, это то что нужно?