помогите исправить ошибки

есть программа написанная на делфи, ее нужно немного подправить. кому интересно и захочет помочь напишите я скину ее

программу не могу сюда сбросить, к сожалению не скидывается сюда