Алгоритм программы которая двигает курсор в обратном направлении

Posted by Chas under Delphi

Как сделать небольшую программу которая должна двигать курсором в противоположном направлении? Пример мыш двигаетса влево а курсор вправо.

Человек_Борща
Тут 2 способа, глобальная ловушка либо как-то ещё. Но найболее простой способ это ловушка.

Так, получаешь ширину и высоту экрана.
Далее просто:
У нас есть конвеерная лента ввиде массива array[0..1] of TPoint, в 0 будем хранить текущие координаты, в 1 заносим новые координаты,

TPoint это XY коррдинаты. Горизонталь монитора это Y а вертикаль это X(Или на оборот, до сих пор путаю оси графика функции).
Далее логика:
Если a[1].X < a[0].X //Движение вверх значит a[1].X + 1 // а мы делаем вижение вниз Если a[1].Y < a[0].Y //Движение влево значит a[1].Y + 1 //а мы делаем движение вправо Если a[1].X > a[0].X //Движение Вниз
значит a[1].X — 1 // а мы делаем вижение вверх
Если a[1].Y > a[0].Y //Движение вправо
значит a[1].Y — 1 //а мы делаем движение влево

Присваиваем мышке a[1] координаты.

Надеюсь ясно?
С ловушкой проблема в том, что координаты мыши для 1 будет сложно получить.
Но думаю и в прогрfмме можно отгребать координаты мыши со всего экрана? без проблем.

GetCursorPos(a[0]); //Базовые кооринаты
Sleep(5); //Ждём изменения
GetCursorPos(a[1]); //Координаты сравнения

тема на форуме

Похожие статьи

• Работа с мышью
• Указать координаты для создания компонента
• Код программы алгоритм Форда-Фалкерсона
• Состояние клавиш мыши
• Алгоритм с уровнем шума
• Как определить выход курсора за пределы объекта Image
• Как скрыть курсор?
• Как программно сделать клик левой кнопкой мыши в определенную координату
• Алгоритм шифрования TEA
• Оптимальный алгоритм — получить список из N наиболее часто встречающихся элементов