Информатика. Программирование в Delphi
100
Рис. 6.4
6. Добавим на форму компонент
Button
и компонент
Label
(рис. 6.7).
7. Изменим заголовок у компонента
Button1
на
Вычислить
, а у компо-
нента
Label9
– на пустую строку (рис. 6.8).
8. Теперь сделаем так, чтобы в полях
Количество
можно было ввести
только целое число, а в полях
Цена
только вещественное. Обработка нажатий
клавиш клавиатуры (событие
OnKeyPress
) будет происходить в одной проце-
дуре
EditKeyPress
для всех полей
Edit
. Выберем в инспекторе объектов
Edit1
.
На вкладке
Events
найдем событие
OnKeyPress
и в правое поле введем назва-
ние процедуры
EditKeyPress
, затем нажмем
Enter
(рис. 6.9).
Рис. 6.5
I...,90,91,92,93,94,95,96,97,98,99 101,102,103,104,105,106,107,108,109,110,...370