яких складається проектProject1.resФайл ресурсовСодержіт піктограми, графічні ізображеніяUnit1.pasФайл програмного модуля Форми 1Определяет функціональність форми № 1Unit1.dfmФайл форми 1Содержіт список всіх компонентів, включених у форму 1Unit2.pasФайл програмного модуля Форми 2Определяет функціональність форми № 2Unit2. dfmФайл форми 2Содержіт список всіх компонентів, включених у форму 2Unit3.pasФайл програмного модуля Форми 3Определяет функціональність форми № 3Unit3.dfmФайл форми 3Содержіт список всіх компонентів, включених у форму 3Base.glfФаіл з вопросаміФайл, що містить список питань Табл .1
.4 Опис і запуск програми
додаток програма
Загальні відомості: програма В«ЕкзаменаторВ» розроблено в середовищі програмування Delphi 6.
Функціональне призначення програми: Прийом тестів в учнів
Використовувані технічні засоби: при розробці програми В«ЕкзаменаторВ» були використані наступні технічні та програмні засоби:
Процесор Intel Pentium 4 3GHz
ОЗУ 3 Гб.
ОС Windows 7 Professional
Виклик і завантаження: для того, щоб запустити програму, необхідно запустити файл В«Екзаменатор.exeВ»
Після запуску програми вибираємо складність, після чого при натисканні кнопки завантажуються питання на які треба відповідати. Дається часу 5 хвилин. Після завантаження з'являється перше питання, час пішов. По закінченню часу тест блокується, і за результатами ставитися оцінка. Якщо тест зданий за 5 хвилин, то тест зупиняється і ставитися оцінка. Програма ставить В«3В» якщо більше 50% відповідей правильні, В«4В» якщо більше 70%, В«5В» якщо більше 90% і В«2В» якщо менше 50%. p align="justify"> Так само передбачений варіант тренування, якщо введений пароль правильний (пароль: В«парольВ»). Під час тренування правильні відповіді позначені червоним кольором. br/>
2. Код програми
2.1 Текст програми. Частина 1
Unit1;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Menus, StdCtrls, Buttons, ExtCtrls; = class (TForm): TRadioGroup;: TMainMenu;: TBitBtn;: TMenuItem ;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TGroupBox;: TLabel;: TLabel;: TLabel;: TBitBtn;: TBitBtn;: TLabel;: TLabel;: TLabel;: TLabel;: TLabel;: TLabel;: TLabel;: TLabel;: TLabel;: TTimer; N4Click (Sender: TObject); N8Click (Sender: TObject); N11Click (Sender: TObject); BitBtn4Click (Sender: TObject); Timer1Timer (Sender: TObject); zagruz (); vopr (); prov (a: integer); BitBtn1Click (Sender: TObject); protv (); res (); BitBtn2Click (Sender: TObject); N6Click (Sender: TObject); N1Click (Sender: TObject);
