Урок на делфи 18. шлейф у мышки

задание на delphi. Сделать что бы у курсор мыши оставлял след. исходный код https://dear-ruslan.ru/new/urok/delphi/delphiurok18.php