ии OnEnter):
При клике на Edit1, Edit2 становится белым (код в событии OnExit):
Так же, текст, вводимый в Edit2 будет отображаться в заголовке программы (код в событии OnChange) и по коду записанному в событии OnKeyPress в Edit2 нельзя вводить никакие символы кроме русского алфавита.
Пример 2
Рассмотрим работу некоторых событий кнопки Button на простом конкретном примере.
Для этого на форме размещаем компонент Button. Затем на вкладке Events в Object Inspector ищем событие OnMouseMove. В него прописываем form1. color:clGreen:
Далее ищем событие OnMouseLeave и в него пишем в него form1. color:clBtnface:
Следующим шагом найдём событие OnClick (его также можно задействовать дважды, кликнув на саму кнопку), и напишем в него form1. windowstate:wsMaximized.
Запускаем. Получится в итоге, что по событию OnMouseMove при наведении курсора мыши на кнопку, форма перекрасится в зелёный цвет, а когда пользователь убирает с мыши курсор, задействуется событие OnMouseLeave, и форма возвращается к первоначальному цвету. При нажатии на саму кнопку задействуется событие OnClick, и по прописанному в нём коде, форма разворачивется на весь экран:
Задание 1
Создать приложение, которое производит вычисление суммы двух чисел. Входные данные вводите из текстовых полей. А вычисление должно происходить по нажатию кнопки.
Замечание: Программа должна быть оформлена с элементами дизайна.
Задание вычисление суммы двух чисел выполните по следующему алгоритму:
1. Запустите среду Delphi.
2. Оформите форму (произведите изменения строки заголовка, цвета и шрифта на форме).
3. Сохраните проект, выполнив команду Файл - Сохранить проект как
oo Открыть Мои документы - Папка с номеро
Страницы: << < 4 | 5 | 6 | 7 | 8 > >>