Розробка тестового програми Компоненти меню Delphi

Інформатика, програмування

Тюменська ДЕРЖАВНИЙ КОЛЕДЖ ЗВ'ЯЗКУ, ІНФОРМАТИКИ І УПРАВЛІННЯ

РОЗРОБКА тестових додатків

«КОМПОНЕНТИ МЕНЮ DELPHI»

Курсовий проект

Тюмень 2003

Тюменська ДЕРЖАВНИЙ КОЛЕДЖ ЗВ'ЯЗКУ, ІНФОРМАТИКИ І УПРАВЛІННЯ

відділення інформатики та обчислювальної техніки

РОЗРОБКА тестових додатків

«КОМПОНЕНТИ МЕНЮ DELPHI»

Курсовий проект

Виконавець: Лапуха Дмитро

студент групи АСУ-4

Керівник: Косигіна Т.Н.

Зав. відділення: Хасаншіна М.М.

Дата допуску до захисту

«___»________ 2003

Тюмень 2003

ЗМІСТ

Введення

Глава 1. Основи тесту

1. Історична довідка

4
2. Що таке тест

5
3. Види електронних тестів

6
4. Компоненти, що використовуються в програмі

Глава 2. Розробка тесту

2.1. Постановка завдання

2.2. Обгрунтування вибору, використовуваної мови програмування

2.3. Функціональна і логічна структура

2.4 Алгоритм реалізації проекту

2.4.1.Файл питань тесту

2.4.2. Форма програми

16
2.4.3. Завантаження файлу питань тесту

2.5. Опис призначеного для користувача інтерфейсу

2.6. Принцип побудови комплексу технічних засобів

26
Висновок

Список літератури

Програми

ВСТУП

Комп'ютер - одне з головних винаходів століття. В останнє десятиліттявін став невід'ємною частиною життя людини. Комп'ютер застосовують в самихрізних галузях життєдіяльності починаючи з рішення найпростішихматематичних задач, моделювання різних процесів, застосування вбанківській справі, медицині, освіті, видавничій справі, використаннякомп'ютера для управління різною технікою, зокрема, автомобілем,літаком, космічним кораблем до використання в побуті, іграх.

Ідея навчання за допомогою комп'ютера народилася давно. Чи пов'язана вона була звидимістю людиноподібного поведінки комп'ютера, його здатності вестиосмислений діалог з людиною. У цьому проекті розглядається програма,що дозволяє автоматизувати процес навчання - це електронний тест,призначений для перевірки знань.

У першому розділі наводиться історична довідка про тестування, а такж дається визначення тестування, розглядаються різні видиелектронних тестів, і описуються компоненти використовуються в програмі. Піддругому розділі здійснюється постановка задачі, обгрунтування вибору мовипрограмування, дається логічна і функціональна структура програми,далі йде алгоритм реалізації проекту, тобто що являє собою моятестова програма, описується користувальницький інтерфейс і обумовлюютьсясистемні вимоги для роботи та компіляції програми.

Глава 1. ОСНОВИ ТЕСТУ

1.1. Історична довідка

Передісторія тестування йде в глибину століть, вона пов'язана звипробуванням різних здібностей, знань, умінь і навичок. Вже в серединітретього тисячоліття до нашої ери в Стародавньому Вавілоні проводились випробуваннявипускників у школах, де готувалися писарі. Професійно підготовленийпереписувач був центральною фігурою месопотамської цивілізації, завдяки великимна ті часи знань, він був зобов'язаний знати всі чотири арифметичнідії, вміти вимірювати поля, розподіляти раціони, ділити майно,володіти мистецтвом співу та гри на музичних інструментах.

Крім того, перевірялося вміння розбиратися в тканинах, металах,рослинах та ін У Стародавньому Єгипті тільки той навчався мистецтву жерця, хтобув здатний витримати систему певних випробувань. Спочатку кандидат ужерці проходив співбесіду, в процесі якого з'ясовувалися йогобіографічні дані, рівень освіченості; крім того, оцінювалисязовнішність, уміння вести бесіду. Потім йшли перевірки вміння працювати,слухати і мовчати, випробування вогнем, водою, страхом подолання похмурихпідземель в повній самоті і ін

В даний час тестування широко застосовується для оцінки рівнязнань у навчальних закладах, при прийомі на роботу, для оцінки кваліфікаціїперсоналу установ, тобто практично у всіх сферах діяльностілюдини. Випробуваному пропонується ряд запитань, на які він повиненвідповісти.

Зазвичай до кожного питання дається кілька варіантів відповіді, зяких треба вибрати правильний. Кожному варіанту відповіді відповідаєдеяка оцінка. Загальний бал, на основі якого робиться висновок про рівеньпідготовленості випробуваного, виходить підсумовуванням оцінок за відповіді.

1.2. Що таке тест

Можливості застосування комп'ютера в навчальному процесі, вельмирізноманітні. Він може служити для моделювання досліджуваних явищ абосистем, для реалізації навчальних ігор, застосовуватися для виконання обчислень,для редагування текстів, як різного роду тренажерів, якінструмент автоматизації проектування, програмованого управлінняекспериментами, як інформаційно-пошукова або експертна система і,нарешті, як засіб практичного навчання самої комп'ютерної техніки тапрограмування.

В даний час вже створено безліч засобів навчання за допомогоюкомп'ютера. Їх можна кваліфікувати наступним чином: комп'ютерніпідручники, предметно-орієнтовані середовища (мікросвіту, що моделюютьпрограми, навчальні пакети), лабораторні практикуми, тренажери,контролюючі програми.

Тестування - це процес оцінки відповідності особистісної тапедагогічної моделей знань. Головна мета тестування - виявленнявзаємної невідповідності цих моделей і оцінка рівня їх невідповідності.
Тестування проводиться за допомогою спеціальних тестів, які складаються зпевного набору рівня невідповідності. Тестове завдання - це чітке іясне завдання з конкретної предметної області, що вимагає однозначноговизначуваного відповіді або виконання певного алгоритму дій.

Тест - набір взаємопов'язаних тестових завдань, що дозволяють оцінитивідповідність знань учня, експертної моделі знань предметної області.

Клас еквівалентності - безліч тестових завдань, таких, щовиконання учням з них гарантує виконання інших.

Тестове простір - безліч різних тестових завдань з усіхмодулям моделі знань.

Повний тест - підмножина тестового простору, що забезпечуєоб'єктивну оцінку відповідності між особистісної та експертної моделямизнань.

Ефективний тест - оптимальний за обсягом і часу повний тест.

Тестування виступає як педагогічний засіб навчальної системиі може бути використано як метод (технологія) контролю освітньогопроцесу, що дозволяє оцінити рівень знань, умінь і навичок учня.

Побудова комп'ютерних тестів можна здійснити за наступнимипослідовним крокам:

1) Формалізація експертної цільової моделі знань;

2) зменшення проектування тестового простору;

3) Формування та наповнення тестових завдань;

4) Формування повного комп'ютерного тесту;

5) Тестовий експеримент;

6) Вибір ефективного тесту;

7) Аналіз, коригування і доведення тіста до виду експлуатації.

1.3. Види електронних тестів

Для створення тестів по предметній області існують ірозробляються спеціальні інструментальні програми - оболонки,що дозволяють виробляти комп'ютерні тести шляхом формування бази данихз набору тестових завдань.

Інструментальні програми, що дозволяють розробляти комп'ютернітести, можна розділити на два класи: універсальні та спеціалізовані.

Універсальні програми містять тестову оболонку як складовучастину. Серед них можна назвати системи «Адоніс» (Москва), «Фея» (Томськ),
«Linkway». Спеціалізовані тестові оболонки призначені виключнодля формування тестів. Це «Лелека», «Тестум», та ін

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

Іншою важливою властивістю тестових оболонок повинна бути наявністьможливості передачі результатів і протоколу тестування якому-небудьстатистичного пакету для подальшої обробки, що в існуючихтестових оболонках представлено не повно.

Як видно, для вирішення цих та інших проблем створенняефективних тестів доцільно розробляти інтегровані програмнісередовища, що включають в себе пакети з різними інструментальними засобами.
Так, наприклад, для створення математичних тестів була розробленаінтегрована середовище, в якому сполучені система комп'ютерної алгебри
(СКА) та інтерактивна система Link Way.

1.4. Компоненти, що використовуються в програмі

Для реалізації програми були використані наступні компоненти:

1) Form1 - це форма за умовчанням, форми в Delphi використовуються для розміщення графічних об'єктів, які роблять програму такою, якою вона має вийти при виконанні.

2) Gauge1 - це візуальний компонент, служить для відображення результатів тесту.

3) Image1 - відображає графічне зображення і забезпечує роботу з ним.

4) Label2, Label5 - мітки, які використовуються для відображення тексту.

5) Mainmenu - не візуальний компонент, що дозволяє конструювати і створювати на формі смугу головного меню, а також супутні що випадають меню.

6) Memo1 - багаторядкові вікно редагування, використовується для висновку, відображення і редагування багаторядкових текстів.

7) Panel1 - контейнер для угруповання інших компонентів.

8) Button1 - кнопка для виконання користувачем будь-яких команд.

9) Savedialog1 - невізуальних компонент виклику діалогу збереження файлу

10) Timer1 - невізуальних компонент, що дозволяє задавати в додатку інтервали часу.

Глава 2. РОЗРОБКА ТЕСТУ

2.1. Постановка завдання

Технічне завдання даної роботи вимагає розробити програму длятестування студентів в інтегрованому середовищі розробки Delphi 6.

При створенні тестів важливо враховувати багато обставин, наприкладособистість тестованого, вид контролю, методику використання тестів унавчальному процесі і т.п.

Хорошим вважається тест, коли він:

. Чутливий до вгадування тестування.

. Сприйнятливий до неуважності і помилковим діям тестування.

. Позитивно впливає на тестуємо і педагога, який використовує тест.

При цьому тест використовується школярем для навчання (тренажер,самоперевірка) та контролю. Для вчителя ж тест служить:

. Засобом коригування навчального процесу.

. Допоміжним засобом для поточного контролю, дидактичним засобом для навчання.

. Для дистанційного навчання.

Всі вище перераховані властивості тестів зібрані з вибору в одномуелектронному тесті, можуть вирішити безліч питань пов'язаних з оцінкою знань,коригуванням освітнього процесу і т.д.

У результаті аналізу різних тестів можна сформулювати наступнівимоги до програми:

1. Програма повинна забезпечити роботу з тестом довільної довжини, тобто не повинно бути обмеження на кількість питань у тесті.

2. Питання може супроводжуватися ілюстрацією.

3. Для кожного питання може бути представлено до чотирьох можливих варіантів відповіді зі своєю оцінкою в балах.

4. Результат тестування повинен бути віднесений до одного з чотирьохрівнів, наприклад, "відмінно", "добре", "задовільно" або
"погано".

5. Питання тесту повинні знаходитися в текстовому файлі.

6. Програма повинна бути інваріантна до різних тестів, тобто змінив тесті не повинні викликати вимога зміни програми.

7. Якщо питання запропонований, то на нього має бути дана відповідь.

На рис. 1 наведено приклад діалогового вікна програми тестування учас її роботи.

Рис. 1. Діалогове вікно програми тестування

2.2. Обгрунтування вибору, використовуваної мови програмування

Delphi - мова і середовище програмування, що відноситься до класу RAD-
(Rapid Application Development - "Засіб швидкої розробки програм")коштів CASE - технології. Delphi зробила розробку потужних додатків
Windows швидким процесом, що приносять вам задоволення. Програми
Windows, для створення яких потрібно було багато людськихзусиль наприклад в С + +, тепер можуть бути написані однією людиною,використовують Delphi.

Інтерфейс Windows забезпечує повне перенесення CASE-технологій уінтегровану систему підтримки робіт зі створення прикладної системи навсіх фазах життєвого циклу роботи та проектування системи.

Delphi має широкий набір можливостей, починаючи відпроектувальника форм і закінчуючи підтримкою всіх форматів популярних базданих. Середа усуває необхідність програмувати такі компоненти
Windows загального призначення, як мітки, піктограми і навіть діалогові панелі.
Працюючи в Windows, можна бачити однакові "об'єкти" в багатьохрізноманітних програмах. Діалогові панелі (наприклад Choose File і Save
File) є прикладами багаторазово використовуваних компонентів, вбудованихбезпосередньо в Delphi, що дозволяє пристосувати ці компоненти донаявний завдання, щоб вони працювали саме так, як потрібно створюваномудодатком. Також тут є заздалегідь певні візуальні іневізуальних об'єкти, включаючи кнопки, об'єкти з даними, меню і вжепобудовані діалогові панелі. За допомогою цих об'єктів можна, наприклад,забезпечити введення даних просто кількома натисканням кнопок миші, невдаючись до програмування. Це наочна реалізація застосувань CASE -технологій в сучасному програмуванні додатків. Та частина, якабезпосередньо пов'язана з програмуванням інтерфейсу користувачасистемою, що отримала назву візуальне програмування

Вигоди від проектування в середовищі Windows за допомогою Delphi:

1) Усувається необхідність у повторному введенні даних;

2) Забезпечується узгодженість проекту та його реалізації;

3) Збільшується продуктивність розробки та переносимістьпрограм.

Візуальне програмування як би додає новий вимір пристворення додатків, даючи можливість зображати ці об'єкти на екранімонітора до виконання самої програми. Без візуального програмуванняпроцес відображення вимагає написання фрагменту коду, що створює інастав об'єкт "за місцем". Побачити закодовані об'єкти було можливотільки в ході виконання програми. При такому підході досягнення того,щоб об'єкти виглядали і поводилися заданим чином, стаєвтомливим процесом, який вимагає неодноразових виправленьпрограмного коду з наступною прогонкою програми і спостереження за тим,що в підсумку вийшло.

Завдяки засобам візуальної розробки можна працювати з об'єктами,тримаючи їх перед очима й одержуючи результати практично відразу. Здатністьбачити об'єкти такими, якими вони з'являються в ході виконання програми,знімає необхідність проведення безлічі операцій вручну, що характернодля роботи в середовищі, не володіє візуальними засобами - незалежновід того, є вона об'єктно-орієнтованої чи ні. Після того, якоб'єкт поміщений у форму середовища візуального програмування, всі його атрибутивідразу відображаються у вигляді коду, який відповідає об'єкту як одиниці,що виконується під час роботи програми.

Розміщення об'єктів у Delphi пов'язано з більш тісними стосункамиміж об'єктами та реальним програмним кодом. Об'єкти поміщаються у вашуформу, при цьому код, який відповідає об'єктам, автоматично записується ввихідний файл. Цей код компілюється, забезпечуючи, істотно більшвисоку продуктивність, ніж візуальне середовище, яка інтерпретуєінформацію лише в ході виконання програми.

Три основні частині розробки інтерфейсу наступні: проектуванняпанелі, проектування діалогу і представлення вікон. Для загальногокористувацького доступу також повинні враховуватися умови застосуванняархітектури прикладних систем.

Сьогодні з'явилася реальна можливість за допомогою моделювання насучасних багатофункціональних засобах обробки і відображенняінформації, таких як Delphi конкретизувати тип і характеристикивикористовуваних інформаційних моделей, виявити основні особливості майбутньоїдіяльності операторів, сформулювати вимоги до параметрів апаратно -програмних засобів інтерфейсу взаємодії і т.д.

Використання типових рішень, модульного принципу проектуваннясистем відображення і обробки інформації набуває все болїї широкімасштабів, що, втім, цілком природно.

Особливий упор при впровадженні даних завдань слід, звичайно, надаватисучасним CASE-засобів розробки програм, тому що вони найбільшоптимально дозволяють проектувати рішення, в основі яких лежать, впершу чергу, вимоги до узгодженого для користувача інтерфейсу,яким і є інтерфейс Windows. Ніякі продукти інших фірм,доступні сьогодні, не забезпечують одночасну простоту використання,продуктивність і гнучкість в такій мірі, як Delphi. Ця мовазаповнив пролом між мовами 3-го і 4-го поколінь, з'єднавши їх сильністорони і створивши потужну і продуктивну середовище розробки.

2.3. Функціональна і логічна структура

При запуску, програма перевіряє наявність підключеного до неї файлупитань, якщо його не виявлено, видається повідомлення про помилку. Якщо файлпитань є, тоді програма з нього завантажує введення, тобто частина, вякій дається короткий уявлення про тест, а потім питання з варіантамивідповідей, при виборі варіанта відповіді програма запам'ятовує кількість балівза вибраний відповідь і переходить до наступного питання. Наприкінці програмипідраховуються кількість балів за відповіді і виводяться результатитестування, які так само знаходяться у файлі питань. Після цьогопропонується зберегти ці результати у вигляді файлу, якому необхідноприсвоїти ім'я. Наочне уявлення про роботу програми можна отримати з рис. 2.

Ні

Так

Рис. 2. Алгоритм роботи програми

2.4. Алгоритм реалізації проекту

2.4.1. Файл тесту

Тест являє собою послідовність питань, на яківипробуваний повинен відповісти шляхом вибору правильної відповіді з декількохзапропонованих варіантів.

Файл тесту складається з трьох розділів:
. розділ заголовка;
. розділ оцінок;
. розділ питань.

Заголовок містить загальну інформацію про тест, наприклад, про йогопризначення. Заголовок може складатися з декількох рядків. Ознакою кінцязаголовка є точка, що стоїть на початку рядка. За заголовком слідрозділ оцінок, в якому наводяться назви оціночних рівнів і кількістьбалів, необхідну для досягнення цих рівнів. Назва рівня повиннерозташовуватися в одному рядку. Ознакою кінця розділу оцінок єточка, що стоїть на початку рядка. За розділом оцінок слід розділ питаньтесту. Кожне питання починається текстом питання, за яким може слідуватиназва файлу ілюстрації, розташовуване на окремому рядку та починаєтьсясимволом. Файл ілюстрації є ознакою кінця тексту питання.
Якщо до питання немає ілюстрації, то замість імені файлу ставиться крапка. Післяпитання йдуть альтернативні відповіді. Текст альтернативної відповіді можезаймати кілька рядків. У рядку, що йде за текстом відповіді,розташовується кількість балів, яку випробуваний отримає за вибір цьоговідповіді. Якщо альтернативну відповідь не є останнім для поточногопитання, то перед оцінкою ставиться кома, якщо є - то крапка.

У наведеному нижче питанні другий і третій відповіді позначені якправильні (оцінка за їхній вибір не дорівнює нулю). При цьому видно, що вибірдругий альтернативної відповіді дає більш вагомий внесок у загальну сумубалів.

Яку формулу слід записати в комірку В5, щоб обчислити суму виплати?

tabl.bmp

= сума (В2-В4)

, 0

= сума (В2: В4)

, 2

= В2 + ВЗ + В4

Ось приклад розділу оцінок:

Дуже добре

100

Добре

Задовільно

Погано

Файл тесту може бути підготовлений у текстовому редакторі Notepad або
Microsoft Word. У разі використання Microsoft Word при збереженні текстуварто зазначити, що треба зберегти тільки текст. Для цього в діалоговомувікні Зберегти у списку Тип файлу слід вибрати варіант Тільки текст
(*. txt).

2.4.2. Форма програми

Delphi дозволяє об'єднати компоненти в масив, однак створюватисятакі компоненти повинні не під час розробки форми програми, адинамічно - під час роботи програми.

На формі відсутні поля виводу альтернативних відповідей іперемикачі вибору правильної відповіді. Вони будуть створені під час роботипрограми.

Оголошення масиву компонентів нічим не відрізняється від оголошеннязвичайного масиву - вказується ім'я масиву, діапазон зміни індексу ітип елементів масиву. Нижче приведено оголошення масивів компонентів формирозробляється програми:answer: array [1 .. N_ANSWERS] of TLabel;// альтернативні відповідіselector: array [1,. N_ANSWERS 1] of TRadioButton;// кнопки вибору відповіді

Однак, для того щоб компонент з'явився у формі, одного оголошеннянедостатньо. Компонент - це об'єкт Delphi, і його оголошення - це тількивказівник на область пам'яті, що без наявності об'єкта ні на що невказує. Створюється компонент шляхом застосування методу create до вказівникомна компонент, у нашому випадку - до елемента масиву.

Наприклад, інструкції answer [l]: = TLabel.Create (self); answer [1]. Parent: = Form1;створюють компонент (Label) і поміщають його в форму додатку (Form1).

Після створення компоненту програма повинна виконати його налаштування,тобто ту роботу, яку під час створення форми програми виконуєпрограміст за допомогою вікна Object Inspector. Під настройкою розумієтьсяприсвоєння початкових значень тим властивостям компонента, зумовленізначення яких не відповідають поставленим вимогам.

Якщо компонент має реагувати на якийсь захід, то потрібнонаписати процедуру обробки цієї події і помістити оголошення створеноїпроцедури в оголошення типу форми. Наприклад, оголошення типу формирозробляється програми має виглядати так: type

TForm1 = class (TForm)

Labels: TLabel;// поле виведення питання

Image1: ТImage;// область виведення ілюстрації

Panell: TPanel;

Buttonl: TButton;// кнопка Почати, Далі, Вихід procedure FormActivate (Sender: TObject); procedure FormCreate (Sender: TObject); procedure Button1Click (Sender: TObject); procedure SelectorClick (Sender: TObject); private

(Private declarations) public

(Public declarations) end;

На відміну від інших рядків, згенерованих Delphi, оголошенняprocedure SelectorClick (Sender: TObject) вставлено в текст програмивручну.

При створенні процедури обробки події для звичайного компонента
(компонента, який доданий у форму під час розробки форми програми)
Delphi автоматично генерує заготівлю процедури обробки події та їїоголошення. Програміст повинен написати тільки інструкції процедури. Уразі створення процедури обробки події для компонента, якийстворюється динамічно, програміст повинен повністю написати текстпроцедури і помістити її оголошення в оголошення форми.

Після того, як буде написана процедура обробки події, потрібнозв'язати цю процедуру з конкретним компонентом. Робиться це шляхомприсвоєння імені процедури обробки властивості, ім'я якого збігається зім'ям оброблюваного події.

2.4.3. Завантаження файлу тесту

Надіслати назва файлу тесту програмі тестування можна через параметркомандного рядка за допомогою настроювання властивостей значка, що зображує програмутестування на робочому столі або в папці.

Наприклад, для налаштування програми тестування, значок запускуякої знаходиться на робочому столі, на роботу з файлом тесту ххх.txt,необхідно натиснути правою кнопкою мишки на значку програми, зщо з'явився контекстного меню вибрати команду Властивості і в полі Об'єкт,після імені файлу програми (Project1.exe), ввести ім'я файлу тесту
(xxx.txt), уклавши його в подвійні лапки (рис. 3). Текст, що знаходиться вполі Елемент вкладки Ярлик діалогового вікна Властивості, називається командногорядком.

Програма може отримати параметр, вказаний в командному рядкузапуску програми, як значення функції ParamStr (n), де n - номерпараметра. Кількість параметрів командного рядка знаходиться в глобальнійзмінної Paramcount. Для наведеного вище прикладу командного рядказапуску програми тестування значення змінної Paramcount дорівнює 1, афункції ParamStr (1) - xxx.txt.

Нижче наведено фрагмент програми, що забезпечує прийом параметра зкомандного рядка: if ParamCount = 0 then begin

ShowMessage ( 'Помилка! Не виявлено файлу питань тесту.'); goto bye;// аварійне завершення програми end;

FileName: = ParamStr (1);// ім'я файлу - параметр командного рядка.

При запуску програми, що використовує параметри командного рядка, зсередовища розробки параметри потрібно ввести в поле Parameters діалогового вікна
Run Parameters (мал. 4), яка відкривається в результаті вибору з меню
Run команди Parameters.

Рис 3. Налаштування програми тестування

Рис 4. Діалогове вікно Run Parameters

2.5. Опис призначеного для користувача інтерфейсу

Після створення форми у вікно редактора коду, в секцію implementationслід помістити опис глобальних констант (розділ const) і змінних
(розділ var). Потім можна приступити до створення процедур обробки подій.

Їх в програмі три:

1. Обробка події OnActivate для стартової форми.

2. Обробка події Onclick для командної кнопки Button1.

3. Процедура обробки події Onclick - одна, спільна для перемикачіввибору відповіді.

Після запуску програми і виведення на екран стартовою форми відбуваєтьсяподія onActivate. Процедура FormActivate спочатку викликає процедуру
ResetForm, яка, привласнюючи значення False властивості Visible, робитьневидимими поля виводу альтернативних відповідей і всі перемикачі.
Аналогічно робиться невидимої область ілюстрації. Крім того, процедуравстановлює максимально можливу ширину полів міток альтернативнихвідповідей.

Після очищення форми перевіряється, зазначений чи під час запуску програмипараметр - ім'я текстового файлу з питаннями тесту.

Якщо параметр не зазначений (значення ParamСount в цьому випадку однонулю), то присвоєнням значення властивості Caption мітки Label5 виводитьсяповідомлення: «Не вказано файл питань тесту» і властивості Tag кнопки Buttonlприсвоюється значення 2 (Buttonl.Tag: = 2;). Якщо параметр заданий, товідкривається файл тесту.

Програма тестування отримує ім'я файлу тесту як результат функції
ParamStr (1). Реалізація програми передбачає, що якщо ім'я файлу тестузадано без вказівки шляху доступу до нього, то файл тесту та файли зілюстраціями знаходяться в тому ж каталозі, що і програма тестування.
Якщо шлях доступу вказано, то файли з ілюстраціями повинні знаходитися в томуж каталозі, що і файл тесту. Такий підхід дозволяє згрупувати всіфайли одного тесту в одному каталозі.

Відкриється файл тесту звичайним чином. Спочатку зверненням допроцедурі AssignFile назва файлу зв'язується з файлової змінної, а потімвикликається інструкція відкриття файлу для читання.

Після успішного відкриття файлу викликається процедура Infо яказчитує з файлу інформацію про тест і виводить її у форму присвоюваннямпрочитаного тексту властивості Caption поля мітки Label5.

Потім викликається процедура Get Level, яка зчитує з файлутесту інформацію про рівні оцінки. Ця процедура заповнює масиви level іmes.

Після виведення інформаційного повідомлення програма чекає, коликористувач натисне кнопку "Почати" (Button1).

Командна кнопка Button1 використовується для:

. аварійного завершення роботи програми (у випадку, якщо не задано ім'я файлу тесту);

. початку тестування (після прочитання інформаційного повідомлення);

. переходу до наступного питання (після вибору одного з відповідей);

. завершення роботи програми (після прочитання результатів тестування).

Властивість Tag кнопки Button1, використовується для ідентифікації поточногостану форми і вибору дії при натисканні кнопки Button1.

Після виведення інформації про тест значення властивості Tag кнопки Button1дорівнює нулю. Тому в результаті першого натискання кнопки Button1 виконуєтьсята частина програми, яка забезпечує:
. висновок першого питання;
. заміну тексту, що знаходиться на командній кнопці (властивість caption с

Почати на Далі;
. установку невидимого службового перемикача RadioButton5 до обраної стан.

Крім того, привласненням значення False властивості Enabled кнопка
Button1 робиться недоступною, тим самим блокується перехід до наступногопитання до тих пір, поки не буде обраний один з відповідей. Значення властивості

Button1.Tag присвоюється одиниця, тим самим виконується підготовка дообробці наступного натискання кнопки Button1.

Після вибору відповіді і натиснення кнопки Далі (Button1) (в цьому випадкузначення властивості Button1.Tag дорівнює одиниці) до набраної сумою балівдодається кількість балів за обраний відповідь. Потім, якщо кінець файлуне досягнуть, викликається процедура виведення чергового питання. Якщо кінецьфайлу досягнуто, то спочатку закривається файл тесту, текст на кнопці Button1змінюється на Вихід, а значення Button1.Tag встановлюється на 2. Потімза допомогою процедури itog виводяться результати тестування.

Якщо значення Button1.Tag дорівнює двом, то застосуванням методу close доформі Form1 закривається вікно програми, в результаті чого програмазавершує роботу.

Висновок питання та альтернативних відповідей виконує процедураvoprosToScr. Спочатку процедура збільшує лічильник питань vopros іприсвоєнням значення властивості форми Caption виводить номер поточного питанняв заголовок вікна. Потім процедура читає рядки з файлу тесту до тих пір,поки першим символом черговий прочитаного рядка не буде крапка або
"зворотна похила риска".

Після перегляду тексту питання робиться перевірка, який символвикористовується як ознака кінця питання. Якщо зворотна похилариса, що свідчить про те, що до питання є ілюстрація, товластивості Form1.image1.Tag присвоюється одиниця і з прочитаного рядкавиділяється назва файлу ілюстрації.

Завантаження ілюстрації здійснюється застосуванням методу LoadFromFile довластивості image1.Picture. Однак після завантаження ілюстрація на екрані нез'являється, тому що значення властивості image1.visible одно False.

Після зчитування ілюстрації процедура зчитує питання. Післяобробки останнього питання, форма переходить до розділу оцінок. Так само наформі є компонент Gauge1, що призначений для візуального виводуінформації про кількість правильних відповідей. Використовуючи процедуру
Form1.gauge1.progress: = integer ми можемо задати необхідне візуальневідображення кількості балів за відповіді. Для цього нам треба оголоситизмінну, яка б при підрахунку балів автоматично відображалася націй компоненті. Цієї змінної буде summa. Отже, просто пропишемозначення суми (кількості балів) та дії для відображення балів: if summa = 10 then

Form1.gauge1.progress: = 100; if summa = 9 then

Form1.Gauge1.Progress : = 90; if summa = 8 then

Form1.gauge1.progress: = 80; if summa = 7 then

Form1.gauge1.progress: = 70; if summa = 6 then

Form1.gauge1.progress: = 60; if summa = 5 then

Form1.gauge1.progress: = 50; if summa = 4 then

Form1.gauge1.progress: = 40; if summa = 3 then

Form1.gauge1.progress: = 30; if summa = 2 then

Form1.gauge1.progress: = 20 ; if summa = 1 then

Form1.gauge1.progress: = 10; if summa = 0 then

Form1.gauge1.progress: = 0;

End;

Для збереження результатів тестування був використаний компонент
Memo, який був пов'язаний з компонентом savedialog1. Тобто при виведеннірезультатів тестування дані з компонента Label5 містилися в Memo і,потім, їх можна було зберегти, для цього використовується наступні оператори:savedialog1.Execute;// збереження данихmemo1.Lines.SaveToFile (savedialog1.FileName);

Компонент Memo зроблений не візуальним. Наприкінці тесту пропонуєтьсязберегти результат, здійснюється це за допомогою вибору з головного менювкладки Файл/Зберегти. Загальний вигляд програми можна бачити на рис.5, а повнийлістинг програми в додатку 1.

Рис. 5. Загальний вигляд програми «Електронний тест»

2.6. Принцип побудови комплексу технічних засобів

Для запуску основної частини програми, це файл Project1.exe системнівимоги не високі:

- процесор I486;

- 16 Мб оперативної пам'яті;

- 1 Мб або менше відео пам'яті;

- Обсяг дискового простору не більше 5 Мб;

- Операційна система Windows 9x;

А для компіляції та відлагодження самого програмного коду системнівимоги зростають, тому що необхідно буде встановлювати Delphi 6,якої для запуску потрібно:

- Процесор Pentium 166 і вище;

- 32 Мб оперативної пам'яті і вище;

- 4 Мб відео пам'яті;

- Обсяг дискового простору, в залежності від установки від 300 і більше;

- Windows 98

Висновок

В даний час комп'ютери впроваджуються в усі галузі людськоїдіяльності. Вони допомагають автоматизувати процеси, на виконання якихпотрібно багато часу. В цьому курсовому проекті я представив програму длятестування, яка може використовуватися в будь-якій сфері.

Ця програма набагато краще, ніж інші аналогічні програми,завдяки можливості власноручного редагування і додати файлпитань, що дає певну перевагу в порівнянні з іншимипрограмами тестування, при використанні як нових, так і застарілих ПК,файл питань можна написати в текстовому редакторі, набагато швидше, ніжвстановити Delphi і редагувати сам програмний код.

Список літератури

1. Архангельский А.Я. Програмування в Delphi 5. - М.: Нолидж, 2000

2. Архангельский А.Я. Справочное пособ?? е за Delphi 5. - М.: Нолидж,

2000.

3. Баас Р. та інші. Delphi 5. Для користувача. - Київ, 2000.

4. Бобровський В.А. Delphi 5. Початковий курс. - СПб., 1998.

5. Бобровський В.А. Delphi 5. Навчальний курс. - СПб., 2000.

6. Пачок Ксавьє. Програмування в Delphi 5. Керівництво розробника. -

М.: Нолидж, 2000.

7. Рейсдорф Кент. Delphi 4. Освой самостійно. - М.: Бином, 1999.

8. Свиридов С. та інші. Створення мультимедійних додатків. - М.:

Нолидж, 2000.

9. Фаранов В.В. Навчальний посібник з Delphi 4. - СПб., 1999.
10. Ебнер Міхаель. Delphi 5. Керівництво розробника. - Київ, 2000.

Додаток 1. Лістинг програми

unit Unit1;interfaceuses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
Dialogs, ExtCtrls, StdCtrls, Gauges, Menus, jpeg;type
TForm1 = class (TForm)

Panel1: TPanel;

Button1: TButton;

Image1: TImage;

Label5: TLabel;

Label1: TLabel;

Gauge1: TGauge;

MainMenu1: TMainMenu;

File1: TMenuItem;

Save1: TMenuItem; exit1: TMenuItem;

Help2: TMenuItem;

About1: TMenuItem;

Contents1: TMenuItem;

SaveDialog1: TSaveDialog;

Memo1: TMemo;

N1: TMenuItem;

Timer1: TTimer;

Label2: TLabel ; procedure FormActivate (Sender: TObject); procedure FormCreate (Sender: TObject); procedure Button1Click (Sender: TObject); procedure SelectorClick (Sender: TObject);

Продовження додатка 1 procedure About1Click (Sender: TObject) ; procedure Save1Click (Sender: TObject); procedure Contents1Click (Sender: TObject); procedure N1Click (Sender: TObject); procedure Timer1Timer (Sender: TObject); private

(Private declarations) public

(Public declarations) end;var
Form1: TForm1; x: Real;implementationuses Unit2, Unit3;const
N_ANSWERS = 4;
N_LEVEL = 4;varanswer: array [1 .. N_ANSWERS] of Tlabel;// альтернативні відповідіselector: array [1 .. N_ANSWERS 1] of TRadioButton;// кнопки вибору відповідіf: TextFile;fn: string;// ім'я файлу питаньlevel: array [1 .. N_LEVEL] of integer;// сума, соотв. рівнемmes: array [1 .. N_LEVEL] of string;// повідомлення, соотв. рівнемscore: array [1 .. N_ANSWERS] of integer;// очки за вибір відповідіsumma: integer;// набрано очокvopros: integer;// номер поточного питанняotv: integer;// номер обраного відповіді
//Установка форми в початковий стан

Продовження додатка 1
Procedure ResetForm (frm: Tform1); var i: integer; begin form1.label2.visible: = false; form1.Save1.Visible: = false; form1.Gauge1.Visible: = false;
Form1.Memo1.Visible: = false; for i: = 1 to N_ANSWERS do begin answer [i]. width: = frm.ClientWidth-answer [i]. left-5; answer [i]. Visible: = false; selector [i]. Visible: = false; end; frm.Label5.width: = frm.ClientWidth-frm.Label5.left-5; frm.Image1.Visible: = false; end;
// Визначення досягнутого рівня procedure Itog (summa: integer; frm: TForm1); var i: integer; buf: string; begin

Form1.label2.visible: = true; form1.Save1.Visible: = true;

Form1.Gauge1 . Visible: = true;

Form1.Label5.font.size: = 11; buf :=''; str (summa: 5, buf);

Продовження додатка 1buf: = 'Результати вашого тестування' + chr (13) + 'Ви відповіли правильнона: '+ buf +' з 10 питань '; i: = 1; while (summa Form1.Image1.Picture.Height then scaleY: = 1 else scaleY: = h/Form1.Image1.Picture.Height; if scaleY