[DelphiM0ZG]

С этим кодом я не разбирался, а набрал по-быстрому пример. Там рисуется окружность, но если раскомментировать 2 строки кода (там указано какие) - будет по окружности ездить точка.