- •Коренькова Татьяна Николаевна
- •Часть 2
- •Практическая часть
- •Типизированные файлы.
- •Нетипизированные файлы.
- •Библеотека graph
- •Практическая часть Основные графические операторы для построения изображений:
- •Процесс построения изображений с помощью графических процедур разбивается на отдельные этапы:
- •Пример программы построения графика функции.
- •Практическая часть
- •Практическое занятие №24. Изучение интегрированной среды разработчика.
- •Ход работы
- •1. Загрузите систему визуального программирования Delphi.
- •Закройте окно программы Forml, минимизируйте главное окно Delphi и создайте на рабочем диске папку с названием группы, а в ней папку, названную вашей фамилией. Снова активизируйте окно Delphi.
- •Сохраните созданную программу в своей папке.
- •6. Визуально ознакомьтесь со свойствами формы Left, Тор, Width и Height.
- •7. Исследуйте, как изменение значений свойств Left, Тор, Width или Height формы в окне ObjectInspector ведет к изменению расположения или размера формы.
- •8. Измените цвет фона формы.
- •Выполните программу еще раз (см. Пункт 3).
- •Вставьте в форму текстовое поле (объект типа Label) с текстом «Анкета студента».
- •12. Вставьте в форму объект типа Image (картинка).
- •13. Вставьте свою портретную фотографию с помощью свойства Picture (иллюстрация) объекта Imagel.
- •14. Наложите свою художественную фотографию на портретную, вставив в форму еще один объект типа Image.
- •15. Поэкспериментируйте со свойством Visible (видимость) двух изображений, каждый раз выполняя программу (см. Пункт 3).
- •16. Вставьте в форму кнопки для поочередного отображения наложенных одна на другую фотографий - два объекта типа Button с названиями Buttonl и Button2.
- •17. Запрограммируйте кнопку «Портретная фотография» так, чтобы после ее нажатия в форме появлялась портретная фотография.
- •18. Запрограммируйте кнопку «Художественная фотография» соответственно ее назначению (см. Пункт 17).
- •Запустите программу и убедитесь, что кнопки выполняют свои функции. Закройте окно программы «Анкета студента».
- •Создайте ехе-файл проекта
- •Практическое занятие №25 Создание простого проекта. Задачаобобменевалюты
- •Ход работы
- •1. Вставьте в форму два объекта типа RadioButton (переключатель), как показано на рис. 7.
- •2. Задайте начальное значение второго переключателя как активное.
- •16. Запустите программу и убедитесь, что переключатели выполняют предписанные им функции.
- •17. Запрограммируйте кнопку «Выход».
- •18. Запрограммируйте кнопку «Вычислить».
- •24. Создайте ехе-файл Вашей программы.
- •25. Закройте среду Delphi, запустите созданную программу и выполните вычисления для разных входных данных.
- •26. Продемонстрируйте созданную форму преподавателю. За- кончите работу.
- •Практическое занятие №26 Объявление класса, создание экземпляров класса.Задачатабулированияфункции Объекты Memo, MainMenu, PopupMenu, CheckBox, GroupBox. Программирование циклов
- •Ход работы
- •Загрузите среду визуального программирования Delphi.
- •Поменяйте заголовок (Caption) формы с «Forml» на «Табулирование функции» (без кавычек) и увеличьте размеры формы в вертикальном направлении.
- •Смените пиктограмму в левом Верхнем углу формы, указав конкретный файл с рисунком пиктограммы в поле значения свойства Icon (пиктограмма) формы.
- •21. Запрограммируйте команду «Табулировать».
- •Практическое занятие №27 Создание наследованного класса. Задачаобиржеценныхбумаг
- •Ход работы
- •8. В окне текста программы перед разделом implementation введите описание констант и переменных программы:
- •10. В окне текста программы после раздела implementation введите описание метода Refresh формы.
- •Сохраните выполненную на данный момент работу в своей папке.
- •Практическое занятие №28 Перегрузка методов. Задачаотелефонномсправочнике
- •Ход работы
- •8. Сохраните выполненную на данный момент форму в своей папке.
- •9. С помощью мыши задайте ширину столбцов таблицы, на- пример так, как показано на рис. 16.
- •10. Добавьте на форму главное меню и введите названия его команд, как показано на рис. 16 и рис. 17.
- •11. Создайте окно формы «о программе» (см. Рис. 18).
- •Сохраните работу и запустите проект на выполнение.
- •18. Добавьте на форму два объекта - стандартные диалоги Windows для открытия и сохранения файлов.
- •19. Запрограммируйте процедуры открытия и сохранения фай- лов телефонного справочника (команды главного меню «Прочитать из файла» и «Записать в файл»).
- •20. Напишите процедуру создания формы.
- •21. Напишите процедуру заполнения полей редактирования NewEdit.
- •22. Напишите процедуру заполнения комбинированного списка NewComboBox.
- •Сохраните работу, запустите программу, заполните таблицу данными и убедитесь в том, что программа правильно записывает на диск и считывает с диска файлы телефонных справочников.
- •Запрограммируйте команду главного меню «Сохранить изменения в списке записей».
- •Практическое занятие №29 Создание проекта с использованием кнопочных компонентов.
- •Ход работы
- •5. Дважды щелкните на первом таймере и запрограммируйте мигание сообщения «Обязательно нажмите на кнопку «Готово» после размещения рисунков!!» так:
- •6*. Введите описание глобальных переменных программы:
- •6**. Введите описания глобальных констант и переменных программы:
- •Аналогично запрограммируйте соответствующие события для перетягивания двух других рисунков.
- •Создайте еще один метод формы tForml — функцию ImagelnShape для проверки расположения рисунка (объекта Image) в середине некоторой геометрической фигуры (объекта Shape).
- •11*. Запрограммируйте кнопку "Готово", проверяющую правильность расположения рисунков в середине фигур и выводящую информационное окно с сообщением "Правильно!" или "Неправильно!":
- •11**.Запрограммируйте кнопку "Готово", проверяющую правильность расположения рисунков в середине фигур:
- •Сохраните программу и проект в своей папке.
- •Запустите программу. Перетягивайте мышью рисунки на середину соответствующих фигур.
- •Создайте ехе-файл программы и поупражняйтесь с ней.
- •Упражнения. Совершенствование проекта
- •Практическое занятие №31 Создание проекта с использованием компонентов ввода и отображения чисел, дат и времени. Калькулятор
- •Постановка задачи.
- •Ход работы.
- •Упражнения. Совершенствование проекта.
- •Практическое занятие №33 Разработка оконного приложения. Создание новых форм с меню, геометрическими фигурами, палитрой и со шкалой.
- •Практическое занятие №34 Разработка оконного приложения с несколькими формами. Разработка проекта Halfbottle.
- •Постановка задачи.
- •Ход работы
- •Упражнения. Совершенствование проекта.
- •Практическое занятие №35 Разработка многооконного приложения. Проект “Худой или полный?”.
- •Упражнения
- •Сообщения и коды ошибок
- •50. Do expected (Нуженоператор do).
- •54. Of expected (Требуется of).
- •55. Interface expected (Требуется интерфейсная секция).
- •57. Then expected (Требуется then).
- •58. To or downto expected (ТребуетсяТОили downto).
- •73. Implementation expected (Отсутствует исполняемая часть модули).
- •102. String constant expected (Нужнаконстантастроковоготипа).
- •106. Character expression expected (Предшествующее выражение должна иметь символьный тип).
- •161. Code generation error (Ошибка генерации кода).
- •162. Asm expected (Отсутствует зарезервированное слово asm). Ошибки, возникающие во время выполнения программ
- •Ошибки ввода-вывода
- •Критические ошибки
- •Фатальные ошибки
- •Литература
Запустите программу и убедитесь, что кнопки выполняют свои функции. Закройте окно программы «Анкета студента».
Сохраните созданную программу в своей папке. Выберите элемент главного меню File =>SaveAll (Сохранить Все) или нажмите кнопку SaveAll°Ана панели инструментов.
Создайте ехе-файл проекта
Выполните команду главного меню 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 (не доступный) |
Практическая часть
