
- •Практическая работа задача об обмене валюты Объекты: поля редактирования, переключатели и их свойства. Программирование ветвлений
- •Ход работы
- •3. Вставьте в форму два объекта типа RadioButton (переключатель), как показано на рис. 7.
- •4. Задайте начальное значение второго переключателя как активное.
- •18. Запустите программу и убедитесь, что переключатели выполняют предписанные им функции.
- •19. Запрограммируйте кнопку «Выход».
- •20. Запрограммируйте кнопку «Вычислить».
- •26. Создайте ехе-файл Вашей программы.
- •27. Закройте среду Delphi, запустите созданную программу и выполните вычисления для разных входных данных.
- •28. Продемонстрируйте созданную форму преподавателю. За- кончите работу.
Практическая работа задача об обмене валюты Объекты: поля редактирования, переключатели и их свойства. Программирование ветвлений
Цель работы. Создать форму с названием «Обмен валюты» для моделирования соответствующих операций обменного пункта. Применить поля редактирования (Edit) и переключатели (RadioButton, радиокнопка), а также кнопки для выполнения вычислений и выхода из программы (см. образец формы на рис. 8).
Теоретические сведения. Объект поле редактирования (Edit) используют для ввода строки символов с клавиатуры. В случае необходимости для преобразования полученной строки (свойство Text) в число и наоборот применяют стандартные функции языка Pascal Val и Str, или функции среды Delphi StrToFloat и FloatToStr. Кроме уже известных вам свойств, поля редактирования Edit обладают такими:
Свойство |
Описание свойства |
Примеры значений |
CharCase |
Вид символов, которые будут вводить в поле редактирования |
ecNormal (обычные), ecUpperCase (прописные буквы), ecLowerCase (строчные буквы) |
CtI3D |
Объемное изображение объекта |
True, False |
Pass- wordChar |
Символ для ввода пароля |
#0 (обычное отображение текста), * (текст будет отображаться звездочками), 0 (текст будет отображаться нулями) |
ReadOnly |
Возможность менять текст (доступность поля) |
True (текст нельзя менять), False (текст можно менять) |
Hint |
Текст подсказки, который появляется при наведении указателя мыши |
«Введите сумму» (произвольная строка символов) |
ShowHint |
Показывать/Не показывать подсказку |
True, False |
Text |
Текст в поле редактирования |
«0,0001» (произвольная строка символов) |
Объект переключатель (RadioButton) используют для выбора некоторого действия среди нескольких альтернатив. Рассмотрим такие свойства переключателей:
Свойство |
Описание свойства |
Примеры значений |
Checked |
Состояние переключателя |
True (выбранный), False (не выбранный) |
TabOrder |
Порядок выбора объекта клавишей Tab |
0 (первый), 4 (пятый) |
TabStop |
Доступ к данному объекту табулятором |
True (доступный), False (не доступный) |
Ход работы
Загрузите среду визуального программирования Delphi.
Откажитесь от возможности изменять размеры окна программы, указав значение свойства формы BorderStyle — bsDialog.
Задав это значение, выполните программу и убедитесь, что Нельзя изменить размер формы. Обратите внимание на отсутствие кнопок для минимизации и максимизации окна, а также системного меню. Завершите работу программы.