Затем ограничьте область перемещения мыши до (100,100,200,200).
варрект:TRect;
начинать
прямоугольник.Влево:=100;
прямоугольник.Верх:=100;
прямоугольник.Низ:=200;
прямоугольник.Вправо:=200;
windows.ClipCursor(@rect);
Следующее восстанавливает область движения мыши.
windows.ClipCursor(0);
Нет необходимости приводить конкретные примеры, все очень просто. Хи хи хи хи
Справка в Delphi говорит следующее:
Функция ClipCursor ограничивает курсор прямоугольной областью экрана.
Если последующая позиция курсора (заданная функцией SetCursorPos или мышью)
лежит за пределами прямоугольника, Windows автоматически корректирует положение, чтобы сохранить
курсор внутри прямоугольной области.
BOOL ClipCursor(
CONST RECT *lPRect // указатель на структуру с прямоугольником
);
Параметры
ЛПРК
Указывает на структуру RECT, содержащую экранные координаты верхнего уровня.
левый и нижний правый углы ограничивающего прямоугольника. Если этот параметр равен.
NULL, курсор может свободно перемещаться в любом месте экрана.
Возвращаемые значения
Если функция завершается успешно, возвращаемое значение не равно нулю.
Если функция завершается неудачно, возвращаемое значение равно нулю. Чтобы получить расширенную информацию об ошибке, вызовите GetLastError.
Примечания
Курсор является общим ресурсом. Если приложение ограничивает курсор, оно должно это делать.
отпустите курсор с помощью ClipCursor, прежде чем передать управление другому
приложение.
Вызывающий процесс должен иметь доступ WINSTA_WRITEATTRIBUTES к оконной станции.