Последние записи
- Удаление папки с файлами
- Распечатка файла
- Преобразовать массив байт в вещественное число (single)
- TChromium (CEF3), сохранение изображений
- Как в Delphi XE обнулить таймер?
- Изменить цвет шрифта TextBox на форме
- Ресайз PNG без потери прозрачности
- Вывод на печать графического файла
- Взаимодействие через командную строку
- Перенести программу из Delphi в Lazarus
Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk
Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw
2nd
Янв
Алгоритм программы которая двигает курсор в обратном направлении
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]); //Координаты сравнения
Похожие статьи
Купить рекламу на сайте за 1000 руб
пишите сюда - alarforum@yandex.ru
Да и по любым другим вопросам пишите на почту
пеллетные котлы
Пеллетный котел Emtas
Наши форумы по программированию:
- Форум Web программирование (веб)
- Delphi форумы
- Форумы C (Си)
- Форум .NET Frameworks (точка нет фреймворки)
- Форум Java (джава)
- Форум низкоуровневое программирование
- Форум VBA (вба)
- Форум OpenGL
- Форум DirectX
- Форум CAD проектирование
- Форум по операционным системам
- Форум Software (Софт)
- Форум Hardware (Компьютерное железо)