Кто-нибудь слышал о поддержке жестов мыши сторонними разработчиками для версий Delphi до Delphi 2010? Все, что я хочу, это иметь возможность реагировать на нажатие правой кнопки мыши на «смахивание влево» и «смахивание вправо».
Жесты в Delphi (до D2010)
comment
Я нашел статью о реализации жестов мыши в Delphi 7, но она полагается на поддержку жестов в Windows 7 и 8, и это не полное решение, поэтому это может быть не то, что вы ищете.
- person Kenneth Cochran   schedule 22.07.2013
Ответы (1)
Проведите пальцем влево или вправо - это не что иное, как сравнение ваших координат X.
Просто сравните свою координату X в вашем OnMouseDown
событии с координатой X в вашем OnMouseUp
событии.
Если результат положительный, это свайп-влево. Если результат отрицательный, проведите пальцем вправо.
person
Obl Tobl
schedule
22.07.2013
Спасибо. Но что, если бы я хотел масштабировать эту функцию так, чтобы видимые следы мыши появлялись (временно), как вы видите со многими расширениями жестов мыши для Firefox и Chrome? Способен?
- person user1527613; 22.07.2013
Взгляните на это: tecepe.com.br/d7gestures Возможно, последний пример кода может подскажет, как использовать Canvas. Попробуйте использовать с событием OnMouseMove. Там же у вас есть координаты X и Y.
- person Obl Tobl; 23.07.2013