3. Задание

1. Списки ListBox1 и ListBox2 сделать поочередно доступными после нажатия клавиши Enter.

Подсказка. В Object Inspector свойству Enabled компонента ListBox2 придать значение False, а в процедуру, относящуюся к ListBox1, включить строки:

ListBox2.Enabled := True;

ListBox1.Enabled := False;

Form1.ActiveControl := ListBox2;

2. Выполнить проект так, чтобы при правильном выборе названия физической величины слово в левом списке исчезало.

Подсказка. В процедуру, относящуюся к ListBox2, там, где обрабатывается правильный ответ, включить:

ListBox1.Items.Delete(Num1);

ListBox1.Items.Insert(Num1, ‘’);

3. Расширить количество физических величин до 10. Внести необходимые изменения в программу.

Практическая работа № 10 "Разработка теста по географии"

1. Постановка задачи

Создать проект, состоящий из нескольких форм: титульной формы, формы меню, формы помощи и формы непосредственно теста. В зависимости от правильности ответов на тест, который состоит из нескольких разделов (в свою очередь в разделе может быть несколько вопросов), подсчитывается результат и выставляется оценка по каждому разделу.

Пояснения: Новыми в этой программе являются использование в проекте нескольких форм и организация вызова этих форм. При создании новой формы используется шаблон формы Tabbed pages из окна New Items страницы Forms. Вы познакомитесь с новыми компонентами MainMenu (главное меню формы), Memo (многострочный текстовый редактор), которые находятся на странице палитры компонентов Standard, компонентом Image (графический объект) со страницы палитры компонентов Additional и компонентом PageControl (набор панелей с закладками).

2. План разработки программы

Открыть новый проект.

Создать Титульную форму.

Рисунок 20

2.1. Дать название форме Тест по Географии.

2.2. Разместить в форме метки в соответствии с рисунком 20 и присвоить заголовки им.

2.3. Разместить в форме компонент Image (графический объект), который находится на странице палитры компонентов Additional. Выделить Image, в Object Inspector найти свойство Picture, справа от него нажать на кнопку с тремя точками. В появившемся окне встроенного редактора Picture Editor нажать кнопку Load, которая вызывает появление окна для выбора имени графического файла. Выбранная картинка появится вначале в служебном окне, и если пользователь подтвердит (нажав кнопку OK), то картинка появится и в окне формы.

2.4. Разместить в форме кнопку Выход, обеспечивающую прекращение выполнения задачи.

2.5. Разместить в форме кнопку Продолжить. Пока не задаем действия, которые будут выполняться по нажатию этой кнопки.

2.6. Сохранить форму под именем, например, F_Titul.pas и проект – Pr_Test.dpr

Создать форму Меню.

3.1. В меню File с помощью команды New Form создать новую форму.

Выделенная компонента	Окно инспектора объектов	Имя свойства	Действие
Form	Propeties	Caption	Меню
		Name	Заменить на U_Menu

3.2. Создайте меню с помощью компонента MainMenu, который находится на странице палитры компонентов Standard. После этого необходимо создать его опции.

Дважды щелкните на появившейся пиктограмме MainMenu или, выделив компонент MainMenu, щелкните по кнопке в правой половине строки Items Инспектора объектов. И в том и в другом случае на экране появится окно с заголовком Form1.MainMenu1 (рисунок 21).

Рисунок 21

В инспекторе объектов для свойства Caption введите название первого пункта меню Тест, который запишется в синем прямоугольнике, расположенном в верхнем левом крае полосы меню, после чего нажмите Enter – опция готова и можно переходить к созданию следующей.

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

В названиях опций можно указать символ "&" перед тем символом, который будет использоваться для быстрого выбора опции. В нашем примере для опции Тест можно выбрать сочетание клавиш Alt+T, если в строке Caption указать &Тест.

Опция Тест содержит подопции Тестирование, Результат, Выход.

Опция Помощь не содержит подопции.

Для выполнения команды Выход:

Выделенная компонента	Окно инспектора объектов	Имя свойства	Действие
Выход	Events	OnClick	Close;

3.3. Сохраните форму под именем F_Menu.pas.