Помогите пожалуйсто, Добрые люди! Графику совсем незнаю в Delphi!

По стенкам PaintBox не слишком быстро (заметно для пользователя) катится круг. В круге случайным образом выбирается точка. Рисовать линию, которую будет описывать эта точка при движении круга