Дипломная работа: Обучающе-контроллирующая система для подготовки студентов
4. Класс TWinEditTema(модуль AddTema) - отображает диалог добавления новой темы.
Методы класса:
- butCancelClick() - добавляет новую тему в файл БД Teма.db.
- butOkClick() - закрывает диалог добавления новой темы.
4.2 Описание программы администрирования
Программа администрирования, являясь составной частью универсальной обучающе-контролирующей системы, предназначена для использования в сочетании с программой создания тестов и предоставляет пользователю следующие возможности:
· формирование билетов;
· задание времени ответа на вопросы билета;
· задание системы оценки результатов тестирования;
· просмотр и распечатка результатов (протокола) тестирования на принтере.
Программа реализована на языке ObjectPascal в среде визуального программирования Delphi 2.0 фирмы BorlandInternational. Текст программы и используемых ею модулей приведен в прил.2.
Программой используются следующие файлы БД: Control.db, Tema.db, Question.db, Tickets.db. Схема связей файлов БД, используемая рассматриваемой программой, приведена на рис.4.2.
Программа создает файл Test.ini и записывает в раздел Options следующие параметры:
| TestTime | - время тестирования (мс); |
| MaxTicket | - число сформированных билетов; |
| MaxMark | - система оценки результатов(балл). |
      |
Рис.4.2. Схема связей файлов БД для программы администрирования
Так как программа разрабатывалась в системе визуального программирования Borland Delphi в соответствии с принципом модульности, то в каждом модуле объявляется отдельный класс, который содержит в себе данные и методы работы с ними а также методы работы с данными из других классов. Ниже приведены описания классов, используемых в рассматриваемой программе.
1. Класс TAdminForm (модуль Main) ‑ отображает главное окно программы.
Переменные класса:
- CreateForm - индикатор создания формы (True,если выполняется метод FormCreate);
- IniFile - используется для работы с INI-файлом.
Методы класса:
- ShowHint() - отображает подсказку в строке состояния;
- DBControlCalcFields() - производит пересчет оценок в соответсвии с текущей системой оценки результатов;
- FormClose() - выполняет все необходимые действия перед закрытием программы;
- TestTimeChange() - сохраняет в файле TEST.INI значение параметра TestTime;
- MaxmarkChange() - сохраняет в файле TEST.INI значение параметра MaxMark;
- CreateTicketBtnClick() - выводит диалог параметров формирования билетов;