Цель работы - создать программу, выполняющую следующие действия: 1. После запуска программы ввести текст в текстовом поле.

Практическая работа № 5 Изменение заголовка формы

Рис. 18.

2. По щелчку мышью на кнопке "Сменить заголовок окна" изменяется заголовок окна.

Практическая работа № 5 Изменение заголовка формы

Рис. 19.

3. Ввести новый текст в текстовом поле.

4. Изменить название заголовка окна по нажатию клавиши Enter.

5. Для выхода из программы необходимо щелкнуть мышью на закрывающей кнопке в строке заголовка.

Описание плана разработки программы

1. Открыть новый проект.

2. Разместить на форме экземпляры компонентов: метку Label, кнопку Button, текстовое поле Edit.

3. Выполнить следующие действия:

Таблица 4.

Выделенный объект

Вкладка окна Object Inspector

Имя свойства/ имя события

Действие

Forml

Properties

Caption

Установка имени формы "ПроектЗ"

Labell (Вкладка Standard)

Properties

Caption

Ввод текста надписи "Введите новый заголовок:"

Editl (Вкладка Standard)

Properties

Text

Очистить значение свойства Text

Buttonl (Вкладка Standard)

Properties

Caption

Установка имени кнопки "Сменить заголовок окна"

Default

Выбрать в раскрывающемся списке значение True

Events

OnClick

Form1.Caption := Edit1.Text;

4. Сохраните проект, запустите и протестируйте его.

Задание для самостоятельного выполнения

Создать программу, выполняющую следующие действия:

1. После запуска программы отображаются: две строки для ввода текущих курсов для евро и доллара; строка для ввода денежной суммы в рублях; две строки для вывода эквивалента в евро, долларах.

Практическая работа № 5 Изменение заголовка формы

Рис. 20.

2. Ввести текущий курс для евро и доллара.

3. Ввести денежную сумму в рублях.

4. По щелчку мышью на кнопке "Подсчитать эквивалент" выводится денежная сумма в евро и долларах.

5. Ввести новый текущий курс для евро и доллара.

6. Ввести новую денежную сумму в рублях.

7. По щелчку мышью на кнопке "Подсчитать эквивалент" выводится новая денежная сумма в евро и долларах.

8. Для выхода из программы необходимо щелкнуть мышью на закрывающей кнопке в строке заголовка.

Практическая работа № 4 "Случайный выбор" || Оглавление || Практическая работа № 6 "Двигающая кнопка"


Практикум по Delphi для решения прикладных задач



Новости за месяц

  • Октябрь
    2021
  • Пн
  • Вт
  • Ср
  • Чт
  • Пт
  • Сб
  • Вс