Автор: Зенкова О.В. Учитель информатики и математики МБОУ СОШ 46 г.Новосибирск, 2008

Задача на урок: Мы сегодня создадим небольшое приложение в программе DELPHI в виде теста. Посмотрите, что у вас должно получиться.

Порядок работы: 1.Написать тест в любом текстовом редакторе, например, Word. 2.Открываем программу Delphi. 3.Создаём новый документ. 4.Создаём вкладки для вопросов.Создаём вкладки для вопросов. 5.Оформляем вопросы ( вопрос, варианты ответов, вставка картинок).Оформляем вопросы ( вопрос, варианты ответов, вставка картинок). 6.Создаём меню теста.Создаём меню теста. 7.Прописываем коды.Прописываем коды. 8.Создаём кнопки для результата и выхода.Создаём кнопки для результата и выхода. 9.Дополнительно.Дополнительно.

Сегодня мы создадим небольшой тест из 3 вопросов. Откроем Word и наберем сам тест. 1.Сколько времён года мы знаем? Какие месяцы являются зимними? январь, февраль, декабрь март, апрель, май июнь, июль, август сентябрь, октябрь, ноябрь 3.Сколько дней в високосном году? не знаю Запомните или пометьте правильные ответы.

Открываем программу. 1.File New Application 2.Переименуем форму: 3. Можем поменять фон у формы.

Создаём вкладки: 1Win PageControl 2Определяем размер на форме. PageControl

3. Правой кнопкой мыши на поставленном элементе New Page ( столько раз, сколько вопросов в тесте.) 4. Переименуем вкладки: 1 вопрос, 2 вопрос, 3 вопрос.

Оформляем вопросы. 1.Встаём на вкладку для 1 вопроса. 2.Помещаем на эту вкладку для написания вопроса элемент Standard ---- Label, для вариантов ответов Standard RadioGroup.

3. Копируем или печатаем первый вопрос и вставляем в Caption. Можно зайти в Font … и изменить размер и цвет текста.

4. Работаем с вариантами ответов. Переименуем в Caption ---- Варианты ответов. Items ---- … ---- копируем варианты ответов

5. Можно вставить картинку: Additional ---- Image и размещаем на вкладке. Затем, в инспекторе объектов: Picture ---- … ---- Load OK Stretch ---- True

Оформите сами 2 и 3 вопросы.

Создаём главное меню нашего теста. 1. На панели инструментов, в группе Standard MainMenu

2. Инспектор объектов Items ---- … 3. Нажимая поочередно на компоненты записываем их название.

Дизайн практически закончен. Сохраняем и компилируем проект.

Приступаем к написанию кодов. 1.Напомню, что для того, чтобы написать код, надо два раза кликнуть на нужный компонент или переключиться на Unit. 2.Нажимаем на выход и пишем ( где встал курсор) close; 3.Создадим форму для справки. Fail New Form 4.Переименуем её в справка. На форме напечатаем инструкцию через элемент Label, можно поставить картинку.

5. Вернёмся на форму – тест, кликнем по справке и вставим. Добавляем в uses Unit2. Не забываем сохранять и компилировать.

6. Результат. Введём счётчик: Ball Переменная величина: integer Запишем это после var в код.

6. Кликнем по результату. Запишем код как на рисунке. Пояснение: Мы считаем баллы. Ball:=Ball+1; Где стоит ItemIndex=3, это означает, что правильный ответ 4, счёт идёт с 0. Не забываем сохранять и компилировать.

Можно украсить свой тест часами. Для этого вставим невидимый компонент Sistem ---- Timer. Вставим Label, напишем время и пропишем код.

Вот теперь всё! Запускаем программу и любуемся результатом трудов! Попробуйте дома создать тест по любой теме из 6 вопросов.

Для урока использованы материалы: 1.« Информатика и ИКТ, 9 класс», Соловьёва, Л.Ф., Санкт- Петербург, Справка программы Delphi.