Изменение заголовка формы
Цель работы - создать программу, выполняющую следующие действия:
- После запуска программы ввести текст в текстовом поле.
- По щелчку мышью на кнопке «Сменить заголовок окна» изменяется заголовок окна.
- Ввести новый текст в текстовом поле.
- Изменить название заголовка окна по нажатию клавиши Enter.
- Для выхода из программы необходимо щелкнуть мышью на закрывающей кнопке в строке заголовка.
Описание плана разработки программы
1. Открыть новый проект.
2. Разместить на форме экземпляры компонентов: метку Label, кнопку Button, текстовое поле Edit.
3. Выполнить следующие действия:
Таблица 4.
Выделенный объект | Вкладка окна
Object Inspector |
Имя свойства/
имя события |
Действие |
Form1 | Properties | Caption | Установка имени формы «Проект3» |
Label1 (Вкладка Standard) | Properties | Caption | Ввод текста надписи «Введите новый заголовок:» |
Edit1 (Вкладка Standard) | Properties | Text | Очистить значение свойства Text |
Button1 (Вкладка Standard)
|
Properties | Caption | Установка имени кнопки «Сменить заголовок окна» |
Default | Выбрать в раскрывающемся списке значение True | ||
Events | OnClick | Form1.Caption := Edit1.Text; |
4. Сохраните проект, запустите и протестируйте его.
Задание для самостоятельного выполнения
Создать программу, выполняющую следующие действия:
- После запуска программы отображаются: две строки для ввода текущих курсов для евро и доллара; строка для ввода денежной суммы в рублях; две строки для вывода эквивалента в евро, долларах.
- Ввести текущий курс для евро и доллара.
- Ввести денежную сумму в рублях.
- По щелчку мышью на кнопке «Подсчитать эквивалент» выводится денежная сумма в евро и долларах.
- Ввести новый текущий курс для евро и доллара.
- Ввести новую денежную сумму в рублях.
- По щелчку мышью на кнопке «Подсчитать эквивалент» выводится новая денежная сумма в евро и долларах.
- Для выхода из программы необходимо щелкнуть мышью на закрывающей кнопке в строке заголовка.