урок на Делфи 41. защита от неправильного ввода

Задание на Delphi. Защита от некорректного ввода в Edit. https://dear-ruslan.ru/new/urok/delphi/delphiurok41.php для выполнение задачи использовал компоненты и функции edit, maskEdit, TryStrToInt и тд.