Практическая работа №14, 15, лабораторная работа №14, 15

Тема. Работа со списками, кнопками, меню. Элементы интерфейса

Цель. Приобретение практических навыков разработки приложения с использованием компонентов таблиц, а также главного и вспомогательного меню: (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. Запрограммируйте команды подменю Сортировка: По возрастанию и Поубыванию.***