Тема. Работа со списками, кнопками, меню. Элементы интерфейса
Цель. Приобретение практических навыков разработки приложения с использованием компонентов таблиц, а также главного и вспомогательного меню: (MainMenu, PopupMenu, StringGrid). Приобретение практических навыков разработки приложений с использованием компонентов OpenPictureDialog, FontDialog, ColorDialog, Open Dialog.
Ход работы.
1. Изучить теоретический материал.
2. Выполнить практическое задание.
3. Ответить на контрольные вопросы.
4. Составить отчет.
Ответы на контрольные вопросы
1 Для чего в Delphi еспользуются компоненты MainMenu и PopupMenu?
2 Верно ли утверждение - MainMenu - невизуальный компонент?
3 Использование какого свойства MainMenu позволяет добавлять отдельные пункт меню?
4 В чем отличие главного и контекстного меню?
5 …………….– компонент представляет собой стандартное диалоговое окно выбора и открытия файлов.
Практическое задание:
Составить программу для работы с картотекой Студенты, которая создается в виде файла записей. Каждая запись содержит поля: Фамилия Имя Отчество (FIO) - строка 25 символов, дата рождения (DR) - строка 10 символов, адрес(Adres) - строка 25 символов, курс/ группа (Kurs Gr) - строка 10 символов.
1. Запустите Delphi Открыть новый проект - новую форму с многостраничным блокнотом: File New. Forms TabbedPages.
2 Для окна формы с многостраничным блокнотом PageDlg поменять заголовок на Картотека студентов и стиль окна BorderStyle - Sizeable для возможности изменять размеры формы
3 Многостраничный блокнот по умолчанию имеет 3 страницы: TabSheetl, TabSheet2, TabSheet3, которые находятся на Panel 1 и входят в состав PageControll. Необходимо выполнить следующие преоб разования:
->Удалить Panel2 с кнопками Ok, Cancel и Help в нижней части блокнота
-> Удалить TabSheet3 с помощью клавиши Delete.Заменить заголовки TabSheetl, TabSheefl соответственно на Полный список и Поиск и редактирование - свойство Caption.
->Назначить для PageControll свойство HotTrack-True - название вкладки автоматически выделяется цветом при перемещении по нему указателя мыши.
4 Необходимые объекты перенести на форму, добавить главное меню MainMenul и заполнить его
Команда Справка содержит один пункт О программе.
Рисунок 1. Заготовка «Страница 2 многостраничного блокнота»
В работе использованы следующие свойства Properties:
Рисунок 2. Страница 1 - результат работы программы. Состав меню
6. Для создания информационного окна О программе необходимо открыть окно новой формы AboutBoxl: File 4 New...-> Forms -> AboutBoxl.
7. Стиль формы BorderStyle следует установить bsDialog, так как пользователь не должен иметь возможность изменять ее размеры. Для загрузки графического файла следует нажать кнопку - свойство Picture в Инспекторе объектов. Чтобы форма About стала видимой, необходимо написать оператор. Для этого в главном меню надо выбрать команду Справка пункт О программе.
Рисунок 3. Информационное окно О программе
В заготовку программного кода главного модуля внести оператор AboutShow. Программный код для модуля unit UAbout_kart заполняемый пользователем должен содержать только описание кнопки Ок - закрыть форму:
procedure TAboutBox.OKButtonClick(Sender; TObject);
begin
Close
end;
Чтобы модуль UAbout_kart был доступен из главного модуля, необходимо, чтобы раздел implementation головного модуля содержал оператор uses UAbout_kart.
7 Для созданного приложения необходимо использовать следующие объекты управления:
Рисунок 4- Объекты управления
8 Удалить пустую форму Form. В менеджере проекта View-> Project Manager выделить строку с именем Forml и удалить командой Remove
9 Сохранить файл программы и файл формы в рабочей папке на диске с соответствующими расширениями.
10 Добавить кнопки для организации стандартного диалога открытия и закрытия файлов в Windows - OpenDialogl и SaveDialogl. Кнопки находятся на вкладке инструментов Dialog.
Рисунок 5. Project Manager после удаления Forml
11 Страница событий Events заполняется для следующих компонентов:
12 Обращения к процедурам в разделе interface имеет следующий вид:
13 Полный текст программного кода для PageDlgl
14 Запустите программу на выполнение: из меню Run или клавишей F9.
15 После запуска программы на экране появится многостраничный блокнот с двумя вкладками
16 Заполните картотеку записями, используя StringGridl на вкладке Полный список и из меню Файл -> Записать в файл записать в файл kartoteka.txt.
17 Перейти на вкладку Поиск и редактирование и прочитать записи, используя текстовые поля Editl* Edit4 и ComboBoxl.
18 Для завершения выполнения программы выполняется команда Файл/ Exit или выполнить команду Run/ Program Reset.
19 Задания: Запрограммируйте кнопки Next, Delete, Find. Запрограммируйте команды подменю Сортировка: По возрастанию и По убыванию.***
