Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Практическая работа 10.doc
Скачиваний:
3
Добавлен:
30.11.2018
Размер:
139.78 Кб
Скачать

7. Создать форму Тестирование (u_Test)

7.1. Построить форму Тестирование на основе стандартной формы Tabbed Notebook Dialog и включить в нее 5 вопросов (5 вкладок TtabSheet).

Пример теста по географии:

1) За начало отсчета географической долготы места принят:

  • Экватор

  • Меридиан 180 '

  • Нулевой меридиан

  • Северный полюс

2) Линии, соединяющие на климатических картах точки с одинаковым атмосферным давлением, называются:

  • Горизонталями

  • Изометмами

  • Изобарами

  • Изогиетами

3) Артезианскими называются воды:

  • Почвенные

  • Грунтовые

  • Межпластовые ненапорные

  • Межпластовые напорные

4) Основным географическим следствием шарообразной формы Земли являются:

  • Смена дня и ночи

  • Смена времени года

  • Широтная зональность

  • Высотная поясность

5) Образование пояса низкого атмосферного давления в экваториальных широтах обусловлено прежде всего:

  • Низкими температурами воздуха

  • Высокими температурами воздуха

  • Деятельностью циклонов

  • Деятельностью антициклонов

7.2. Самостоятельно создать форму Тестирования и переход на нее из формы Меню. Для этого повторить все шаги, которые были сделаны при создании формы Помощь (см. пункт 6). Сохранить созданную форму под именем F_Test.pas.

7.3. Для правильного контроля выполнения тестирования сделайте так, чтобы последовательно были доступны сначала только первый вопрос, затем только второй и т.д. Для этого предусмотреть дополнительную кнопку завершения тестирования каждого вопроса.

7.4. Сохранить выполненную работу (File, Save All). Запустить программу на выполнение и проверить правильность ее работы:

  • перейти с Титульной формы на форму Меню;

  • перейти с формы Меню на форму Тестирования;

  • выполнить тестирования;

  • выйти из проекта

7.5. Для подсчета результата введем переменную Ball, которую необходимо объявить в разделе Var формы Результат. Внесnb изменения в программу для подсчета баллов.

8. Создать форму Результат (u_Res)

Форма Результат должна содержать оценку тестирования и кнопку Выход.

8.1. Самостоятельно создать форму Результат и переход на нее из формы Меню. Для этого повторите все шаги, которые были сделаны при создании формы Помощь (см. пункт 6).

8.2. Сохранить созданную форму под именем F_Res.pas

8.3. Создать переход с формы Меню на форму Результат. Для этого нужно перейти на форму Меню и установить курсор на опции Результат, щелкнуть  мышью и внести изменения в процедуру обработки:

Выделенный объект

Вкладка окна Object Inspector

Имя свойства/ Имя события

Значение/Действие

Результат (опция)

Events

OnClick

U_Res.Label1.Caption:='Ваш результат: '+ IntToStr(Ball); U_Res.ShowModal;

Кроме того, нужно описать в модуле F_Menu.pas внешнее имя F_Res, разместив его в блоке реализации (implementation):

uses F_Res;

9. Проверьте правильность работы программы.

Задание для самостоятельного выполнения, №10

 

Задание

1

Создайте тестирующую программу по истории, литературе, математике или какому-либо другому предмету.

2

Дополните программу разделом "Содержание изучаемой темы".

3

Внесите изменения в программу так, чтобы в начале запрашивалось Имя тестируемого, которое выводилось бы на экран при выдаче результата прохождения теста.

4

Для наглядности вывести результат разным цветом. 

 5

Усовершенствуйте программу, введя в раздел описания массив констант с номерами правильных ответов, а в программе только сравнивайте индекс переключателя со значением константы.