2.2. Разместить в форме метки в соответствии с рисунком 1 и присвоить им заголовки.
2.3. Разместить в форме компонент Image (графический объект), который находится на странице палитры компонентов Additional. Выделить Image, в Object Inspector найти свойство Picture, справа от него нажать на кнопку с тремя точками. В появившемся окне встроенного редактора Picture Editor нажать кнопку Load, которая вызывает появление окна для выбора имени графического файла. Выбранная картинка появится вначале в служебном окне, и если пользователь подтвердит (нажав кнопку OK), то картинка появится и в окне формы.
2.4. Разместить в форме кнопку Выход, обеспечивающую прекращение выполнения задачи.
2.5. Разместить в форме кнопку Продолжить. Пока не задаем действия, которые будут выполняться по нажатию этой кнопки.
2.6. Сохранить форму под именем, например, F_Titul.pas и проект – Pr_Test.dpr
3.Создать форму Меню.
3.1. В меню File с помощью команды New Form создать новую форму.
Выделенная компонента
Окно инспектора объектов
Имя свойства
Действие
Form
Propeties
Caption
Меню
Name
Заменить на U_Menu
3.2. Создайте меню с помощью компонента MainMenu, который находится на странице палитры компонентов Standard. После этого необходимо создать его опции.
Дважды щелкните на появившейся пиктограмме MainMenu или, выделив компонент MainMenu, щелкните по кнопке в правой половине строки Items Инспектора объектов. И в том и в другом случае на экране появится окно с заголовком Form1.MainMenu1 (рисунок 2).
Рис. 2Заполнение опций меню.
В инспекторе объектов для свойства Caption введите название первого пункта меню Тест, который запишется в синем прямоугольнике, расположенном в верхнем левом крае полосы меню, после чего нажмите Enter – опция готова и можно переходить к созданию следующей.
Каждая опция главного меню может раскрывать список подопций или содержать конечную команду. Для создания подопций щелкните мышью по строке ниже опции и введите первую подопцию. Продолжайте ввод, пока не будет создан весь список подопций.
В названиях опций можно указать символ "&" перед тем символом, который будет использоваться для быстрого выбора опции. В нашем примере для опции Тест можно выбрать сочетание клавиш Alt+T, если в строке Caption указать &Тест.
Опция Тест содержит подопции Тестирование, Результат, Выход.
Опция Помощь не содержит подопции.
3.3. Сохраните форму под именем F_Menu.pas.
Создадим переход с Титульной формы на форму Меню. Для этого нужно перейти на Титульную форму.
Выделенная компонента
Окно инспектора объектов
Имя свойства
Действие
Продолжить (кнопка)
Events
OnClick
U_Menu.ShowModal;
Кроме того, нужно описать в модуле F_Title.pas внешнее имя F_Menu, разместив его в блоке реализации (implementation):
uses F_Menu;
Сохраните выполненную работу (File – Save All). Запустите программу на выполнение и проверьте правильность ее работы:
· переход с Титульной формы на форму Меню;
· выход из проекта.
4.Создать форму Помощь.
4.1. В меню File с помощью команды New можно создать новую форму.
На форму разместить поле Memo с инструкцией к работе.
4.2. Добавьте кнопку Выход и дать ей значение Close.
4.4. Измените название формы, для чего в Object Inspector откройте список объектов, выберите:
Выделенная компонента
Окно инспектора объектов
Имя свойства
Действие
Form3
Propeties
Caption
Помощь
Name
Заменить на U_Instr
4.5. Сохраните созданную форму под именем F_Instr.pas.
4.6. Создадим переход с формы Меню на форму Помощь. Для этого нужно перейти на форму Меню и установить курсор на опции Помощь, щелкнуть клавишей мыши и внести изменения в процедуру обработки:
Выделенная компонента
Окно инспектора объектов
Имя свойства
Действие
Помощь (кнопка)
Events
OnClick
U_Instr.ShowModal;
Кроме того, нужно описать в модуле F_Menu.pas внешнее имя F_Instr, разместив его в блоке реализации (implementation):
uses F_Instr;
4.7. Сохраните выполненную работу (File – Save All). Запустите программу на выполнение и проверьте правильность ее работы:
· переход с Титульной формы на форму Меню;
· переход с формы Меню на форму Помощь;
· выход из Помощи.
5. Создать форму Тестирование (U_Test).
На странице Forms выберите форму Tabbed pages. Перед вами появится стандартное окно новой формы Tabbed Notebook Dialog (рисунок 3).
Рис.3 Шаблон формы с закладками
Рассмотрите список содержащихся в ней объектов, для чего вызовите весь список. Форма построена на основе компонента TPageControl и содержит несколько перекрывающих друг друга панелей класса TTabSheet. Каждая панель выбирается связанной с ней закладкой и может содержать свой набор помещенных на нее компонентов. Чтобы на этапе конструирования добавить новую панель или выбрать ранее вставленную, щелкните по компоненту правой кнопкой мыши и выберите New Page (новая панель), Next Page (следующая панель) или Previous Page (предыдущая панель). Смена панелей идет циклически.
5.1.Пусть наша форма Тестирования будет построена на основе стандартной формы Tabbed Notebook Dialog и будет содержать 5 вопросов (5 панелей TtabSheet).
5.2.
Рис. 4 Форма «Тестирование»
5.2. Самостоятельно создайте форму Тестирования и переход на нее из формы Меню. Для этого повторите все шаги, которые были сделаны при создании формы Помощь (см. пункт 4). Сохраните созданную форму под именем F_Test.pas.
5.3. Сохраните выполненную работу (File – Save All). Запустите программу на выполнение и проверьте правильность ее работы:
· переход с Титульной формы на форму Меню;
· переход с формы Меню на форму Тестирования;
· выполнение тестирования;
· выход из Тестирования.
5.4 Для кнопки ОК оформляется процедура подсчета баллов:
procedure TU_test.OKBtnClick(Sender: TObject);
begin
ball:=0;
if RadioGroup1.ItemIndex=0 then ball:=ball+1;
if RadioGroup2.ItemIndex=0 then ball:=ball+1;
if RadioGroup3.ItemIndex=0 then ball:=ball+1;
end;
6. Создать форму Результат (U_Res).
Для подсчета результата введем переменную Ball, которую необходимо объявить в разделе Var формы Результат. Внесите изменения в программу для подсчета баллов:
6.1. Форма Результат должна содержать оценку тестирования и кнопку Выход.
6.2. Самостоятельно создайте форму Результат и переход на нее из формы Меню. Для этого повторите все шаги, которые были сделаны при создании формы Помощь (см. пункт 4). Сохраните созданную форму под именем F_Res.pas. Создадим переход с формы Меню на форму Результат. Для этого нужно перейти на форму Меню и установить курсор на опции Результат, щелкнуть клавишей мыши и внести изменения в процедуру обработки:
Выделенная компонента
Окно инспектора объектов
Имя свойства
Действие
Результат (кнопка)
Events
OnClick
ball:=F_test.ball;
U_Res.Label1.Caption:='Ваш результат: '+ IntToStr(Ball);
U_Res.ShowModal;
Кроме того, нужно описать в модуле F_Menu.pas внешнее имя F_Res, разместив его в блоке реализации (implementation):
uses F_Res;
Проверьте правильность работы программы.
Задания для самостоятельного выполнения:
1. Создайте тестирующую программу по какому-либо другому предмету.
2. Внесите изменения в программу так, чтобы в начале запрашивалось Имя тестируемого, которое выводилось бы на экран при выдаче результата прохождения теста.
Вариант № 1
Создайте тестирующую программу по предмету «Операционные системы и программное обеспечение ВК» для раздела Операционная система MS DOS.
Вариант № 2
Создайте тестирующую программу по предмету «Операционные системы и программное обеспечение ВК» для раздела Операционная система Windows.
Вариант № 3
Создайте тестирующую программу по предмету «Операционные системы и программное обеспечение ВК» для раздела Операционная система Linux.
Вариант № 4
Создайте тестирующую программу по предмету «Операционные системы и программное обеспечение ВК» для раздела Файловые оболочки.
Вариант № 5
Создайте тестирующую программу по предмету «Операционные системы и программное обеспечение ВК» для раздела Архиваторы.
Вариант № 6
Создайте тестирующую программу по предмету «Операционные системы и программное обеспечение ВК» для раздела Антивирусы.
Вариант № 7
Создайте тестирующую программу по предмету «Операционные системы и программное обеспечение ВК» для раздела Текстовый процессор MS Word.
Вариант № 8
Создайте тестирующую программу по предмету «Операционные системы и программное обеспечение ВК» для раздела Табличный процессор MS Excel.
Вариант № 9
Создайте тестирующую программу по предмету «Основы алгоритмизации и программирования» для раздела Основы программирования.
Вариант № 10
Создайте тестирующую программу по предмету «Основы алгоритмизации и программирования» для раздела Основы объектно-ориентированного программирования (ООП).
Вариант № 11
Создайте тестирующую программу по предмету «Основы алгоритмизации и программирования» для раздела Визуальное программирование. Среда Delphi.
Вариант № 12
Создайте тестирующую программу по предмету «Численные методы» .
Вариант № 13
Создайте тестирующую программу по предмету «основы математической статистики
Вариант № 14
Создайте тестирующую программу по предмету «Основы социологии и политологии»
Вариант № 15
Создайте тестирующую программу по предмету «Экономика» .
Вариант № 16
Создайте тестирующую программу по предмету «Философия» .
