
По схеме событие приходит 64 раза/сек, если форма внутри экрана и передвинулась влево - Off, если двигается медленно или остановилась - On, навеное, надо округление перед If убрать.
Кстати в Math есть свойство AngleMode и совсем не обязательно переводить градусы в радианы ручками
