Стр. 112 - Информатика. Программирование в среде Delphi. Часть 1

Информатика. Программирование в Delphi
112
Рис. 7.3
Рис. 7.4
Рис. 7.5
Далее в разделе Implementation добавим саму эту процедуру.