Удержание курсора мыши в lazarus

[noatime]

Всем привет! Требуется ваша помощь: мне нужно написать программу, которая будет удерживать курсор мыши в своем окне, вот только я не могу найти, как это можно сделать под виндой в Delphi это можно было сделать при помощи ClipCursor, а в lazarus под linux эта функция не работает:(
И еще вопрос, как можно переместить курсор мыши в заданное положение?:)
Заранее спасибо:)

[alexs]

а зачем?

[NXP]

а зачем?

как зачем? а вирусы писать?

[Logo]

а зачем?

как зачем? а вирусы писать?

Почему? Для игрушек, например.

[Иван Шихалев]

Почему? Для игрушек, например.

Ага. Видел я такие игрушки, когда у меня винда была... Выход кнопкой Power.

[Дож]

Ну, это если криво писать - и после потери фокуса окном продолжать удерживать мышь.

Но вообще, без удерживания не понятно как написать шутер.

[noatime]

Ну вообще это для двух целей. Во-первых, немного кривое решение проблемы фокуса мыши в вайне, когда в некоторых играх (типа Unreal 2) курсор улетает за пределы экрана. Во вторых, чтобы осуществлять привязку координат поверхности какого-либо тела, варианта дешевле использования мышки я не нашел:)

[noatime]

Ладно, сам уже нашел:) курсор в заданную точку можно перенести так:

Код: Выделить всё

Mouse.CursorPos:= Point(x,y)

Оказывается ларчик просто открывался:)

[Killer_86]

Здравствуйте, подымаю тему, люди скажите как в Lazarus удержать мышь в некотором квадрате?

[Vadim]

Killer_86
В событии OnMouseLeave определите действие, возвращающее курсор обратно на форму.