Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
230401_MU_-_Osnovy_algoritmizatsii_i_programmir...docx
Скачиваний:
12
Добавлен:
01.07.2025
Размер:
1 Мб
Скачать
☆
  1. Запустите программу и убедитесь, что кнопки выполняют свои функции. Закройте окно программы «Анкета студента».

  2. Сохраните созданную программу в своей папке. Выберите элемент главного меню File =>SaveAll (Сохранить Все) или нажмите кнопку SaveAll°Ана панели инструментов.

  3. Создайте ехе-файл проекта

Выполните команду главного меню Project =>BuildAll (Скон­струировать Все).

22. Закройте Delphi, выполните созданную программу и поупражняйтесь с работой кнопок.

Запустите ехе-файл с именем проекта и пиктограммой т$ из своей папки.

23. Продемонстрируйте созданную форму преподавателю. За- кончите работу.

Задача 1.1. Вставьте в форму третью фотографию (вашего дома или машины) и еще одну кнопку с соответствующей подписью. Если файл с такой фотографией не существует, воспользуйтесь любым файлом из библиотеки 16со1ог (см. п. 13).

Задача 1.2. Поменяйте подписи на кнопках на такие: «Сме­нить фотографию» и «Забрать фотографию», перепрограммировав кнопки. Выполните программу и убедитесь в правильности ее ра­боты.

Подсказка. В тексте процедур, описывающих работу кнопок, можно воспользоваться командами вида:

ifImagel. Visible = True then ...

{Если видимость = True или равносильной командой} ifImagel.Visiblethen{Здесь условие истинное, }

{если видимость включена}

Задача 1.3. Поменяйте сценарий работы программы для задачи 1.2 на следующий:

• сразу после запуска программы фотографий на форме не видно, есть две кнопки «Портретная фотография» и «Спрятать фотографию». Доступной является первая кнопка;

после щелчка на кнопке «Портретная фотография» долж­но появиться портретное фото, текст на первой кнопке -поменяться на «Художественная фотография», кнопка «Спрятать фотографию» стать доступной;

• после щелчка на кнопке «Художественная фотография» фотография в форме должна поменяться на художествен­ную, а подпись на этой кнопке - на «Третья фотография»;

после щелчка на кнопке «Третья фотография» фотогра­фия в форме должна поменяться на третью, а подпись на этой кнопке - на«Портретная фотография»; • после щелчка на кнопке «Спрятать фотографию» фото­графия должна исчезнуть, а эта кнопка стать недоступ­ной.

Запишите фрагменты программного кода в отчет. Выполните программу и убедитесь в правильности ее работы.

Подсказка. В тексте процедур, описывающих работу кнопок, можно воспользоваться командами, которые меняют их свойства: Caption (подпись), Visible (видимость), Enabled (доступность).

Задача 1.4. См. условие задачи 1.3. Запрограммируйте кнопку «Спрятать фотографию» так, чтобы, щелкнув на ней, она стано­вилась не только недоступной, но и невидимой.

Задача 1.5. Измените, программный код решения задачи 1.4 так, чтобы, отключая фотографии, надпись на первой кнопке все­гда соответствовала фотографии, которая должна появиться после ее нажатия.

Задача 1.6. Исходя из условия задачи 1.5, сделайте так, чтобы последовательность переключения фотографий не нарушалась вследствие их отключения, а также добавьте текстовую надпись с названием фотографии, видимой в текущий момент.

Практическое занятие №25 Создание простого проекта. Задачаобобменевалюты

Объекты: поля редактирования, переключатели и их свойства. Программирование ветвлений

Цель работы. Создать форму с названием «Обмен валюты» для моделирования соответствующих операций обменного пункта. Применить поля редактирования (Edit) и переключатели (RadioButton, радиокнопка), а также кнопки для выполнения вы­числений и выхода из программы (см. образец формы на рис. 8).

Теоретические часть

Объект поле редактирования (Edit) используют для ввода строки символов с клавиатуры. В случае необходимости для преобразования полученной строки (свойствоText) в число и наоборот применяют стандартные функции языка PascalValи Str, или функции среды DelphiStrToFloatи 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 (не доступный)

Практическая часть