урок на Делфи 42 Индикатор выполнения

Задание на Delphi. Индикация выполнения программы. https://dear-ruslan.ru/new/urok/delphi/delphiurok42.php для выполнение задачи использовал компоненты и функции button, gauge, statusBar, progressBar, round, label, seep и тд.